以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]记录列,影响行状态问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=91225)

--  作者:nbsfy3378
--  发布时间:2016/10/4 11:14:00
--  [求助]记录列,影响行状态问题
If e.DataCol.Name <> "日志" And e.DataCol.Name <> "修改记录"      Then 
      e.DataRow("日志")= e.DataRow("日志") & "[" & e.DataCol.Name & "-" &   e.OldValue &  "] " 
End If

设置了记录列[日志],记录修改内容,代码放在表属性datacolchanged中,但是打开后,所有行都显示为修改状态。
按钮《上一条》

With Tables("员工")
     If .Current IsNot Nothing AndAlso .Current.DataRow.RowState = DataRowState.Unchanged Then \'如果当前行未曾修改
        .Position = .Position - 1 
    End If
End With

点了没反应!
求教!

--  作者:nbsfy3378
--  发布时间:2016/10/4 11:31:00
--  
增加新旧值对比代码后,解决!

If e.DataCol.Name <> "日志" And e.DataCol.Name <> "修改记录"      Then
    If   e.OldValue <> e.NewValue Then
        e.DataRow("日志")= e.DataRow("日志") & "[" & e.DataCol.Name & "-" &   e.OldValue &  "] "
    End If
End If