以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教如何保存多次修改的记录?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=21449)
--  作者：wjl-se
--  发布时间：2012/7/12 16:08:00
--  请教如何保存多次修改的记录?

假定产品表中有一个单价列，你认为这一列比较重要，所以希望增加一列，用于记录：谁在什么时候修改了此产品的单价。

 

假定新增列的名称为"Log"，你可以在产品的AfterEdit事件中设置如下代码：

 

If e.Col.Name = "单价" Then
    e.Row("Log") = User.Name & " " & Date.Now
End If

 

这个只能保存最近一次的修改记录,请问老师如何实现每次的修改都会被纪录下来?
--  作者：狐狸爸爸
--  发布时间：2012/7/12 17:15:00
--  
Log改为备注列，原来的代码改为：
 
If e.Col.Name = "单价" Then
      if e.Row.IsNull("Log") then
           e.Row("Log") = User.Name & " " & Date.Now
      Else
            e.Row("Log") = e.Row("Log") & vbcrlf & User.Name & " " & Date.Now
      End if
End If
--  作者：wjl-se
--  发布时间：2012/7/13 8:47:00
--  

谢谢狐爸!!