以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  记录下修改某列的编辑者和修改内容  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88824)
--  作者：liu1992
--  发布时间：2016/8/10 10:32:00
--  记录下修改某列的编辑者和修改内容
表A中有几个字段的修改比较重要，分别是“租金”，“本期租金起始时间”，“本期租金结束时间”。希望在保存的时候，能够在“租金备注信息”记录下被修改的信息记录和是被哪个用户修改的。
请问，该如何做到？
--  作者：cbt
--  发布时间：2016/8/10 10:51:00
--  
\'参考 

\'DataColChanged 事件

If e.DataCol.Name = "第一列" Then
 e.DataRow("第十列") &= "修改者: " & User.Name & " 修改内容:" &e.NewValue
End If

 
--  作者：大红袍
--  发布时间：2016/8/10 11:00:00
--  

select case e.datacol.name
    Case "第一列", "第二列"
        e.DataRow("第十列") = "修改者: " & User.Name & " 修改内容:列(" & e.DataCol.name & ")" & e.NewValue & iif(e.DataRow("第十列")>"", vbcrlf & e.DataRow("第十列"), "")
End Select