Foxtable(狐表)用户栏目专家坐堂 → [求助]操作日志里怎么除开某些辅助列的变化记录


  共有1892人关注过本帖树形打印复制链接

主题:[求助]操作日志里怎么除开某些辅助列的变化记录

帅哥哟,离线,有人找我吗?
leopain
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:172 积分:1188 威望:0 精华:0 注册:2015/8/5 16:45:00
[求助]操作日志里怎么除开某些辅助列的变化记录  发帖心情 Post By:2015/9/30 16:42:00 [只看该作者]

老师
我在全局表的datacolchanged事件里写了下面的代码
但是我有些表里套用辅助列绘制鼠标进入单元格时的样式
但是有个弊端就是 日志表里会把辅助列的数据变化也记录进来
有没有办法除开这些列的记录呢?


If e.DataTable.Name <> "操作日志" Then
    Dim dr As DataRow = DataTables("操作日志").AddNew
    dr("用户") = User.Name
    dr("涉及表") = e.DataTable.Name
    dr("涉及列") = e.DataCol.Name
    dr("涉及行") = e.DataRow("_Identify")
    dr("操作时间") = Date.Now
    dr("操作") = """" & e.OldValue &  """ 改成了 """ & e.NewValue & """"
    dr("原始数据") = e.OldValue
End If

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/30 16:43:00 [只看该作者]

辅助列,列名加上前缀,比如 辅助_排序

 

If e.DataTable.Name <> "操作日志" AndAlso e.DataCol.Name Like "辅助_*" = False Then
    Dim dr As DataRow = DataTables("操作日志").AddNew
    dr("用户") = User.Name
    dr("涉及表") = e.DataTable.Name
    dr("涉及列") = e.DataCol.Name
    dr("涉及行") = e.DataRow("_Identify")
    dr("操作时间") = Date.Now
    dr("操作") = """" & e.OldValue &  """ 改成了 """ & e.NewValue & """"
    dr("原始数据") = e.OldValue
End If

 


 回到顶部