关于操作日志的错误提示，
此主题相关图片如下：微信图片_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

参考

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=94882&skin=0