以文本方式查看主题 - 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 |