关于操作日志的错误提示，
此主题相关图片如下：微信图片_20170501132134.png
同事请问你老师，怎样加入删除行的记录。谢谢！！
If e.DataTable.Name <> "表C" Then
If e.DataRow.RowState = 2 Then
MessageBox.Show(e.DataRow.RowState)
Return
Else
MessageBox.Show(e.DataRow.RowState)
Dim dr As DataRow = DataTables("表C").AddNew
dr("ID") = e.DataRow("_Identify")
dr("用户") = User.Name
dr("涉及表") = e.DataTable.Name
dr("涉及列") = e.DataCol.Name
dr("涉及行") = e.DataRow("_Identify")
dr("时间") = Date.Now
dr("操作") = """" & e.OldValue & """ 改成了 """ & e.NewValue & """"
Dim str As String = ""
For Each c As DataCol In e.DataTable.DataCols
If c.name = e.DataCol.name Then
str += c.Name & "=" & e.oldvalue & "|"
Else
str += c.Name & "=" & e.DataRow(c.Name) & "|"
End If
Next
dr("原行数据") = str
End If
End If
加好友 
发短信
Post By：2017/5/1 13:29:00 [只看该作者]
