以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  日志e.OldValue为空  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87236)

--  作者:gryy
--  发布时间:2016/7/6 11:18:00
--  日志e.OldValue为空
日志里,e.OldValue为空时,不记录,
结果还是在记录,是怎么回事呢
If e.DataTable.Name <> "变更记录" Then
    If e.DataRow.RowState = 2 Then       
        Return
    Else       
        If e.OldValue IsNot Nothing
            Dim dr As DataRow = DataTables("变更记录").AddNew          
            dr("变更表名") = e.DataTable.Name
            dr("变更列名") = e.DataCol.Name
            dr("变更行号") = e.DataRow("_Identify")
            dr("变更时间") = Date.Now       
            dr("变更后内容") = """" & e.OldValue &  """ 改成了 """ & e.NewValue & """"
        End If
    End If
End If

--  作者:大红袍
--  发布时间:2016/7/6 11:26:00
--  

试试

 

If e.OldValue <> Nothing Then