以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  记录下修改某列的编辑者和修改内容  (http://www.foxtable.com/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