Foxtable(狐表)用户栏目专家坐堂 → 在保存成功后记录被修改的记录信息


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

主题:在保存成功后记录被修改的记录信息

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107861 积分:548662 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/10/13 10:29:00 [显示全部帖子]

BeforeSaveDataRow事件测试有什么问题?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107861 积分:548662 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/10/13 10:57:00 [显示全部帖子]

Dim name As New List (Of String) From {"姓名", "用户名", "密码", "用户类型", "创建日期", "禁用", "禁用日期"}

For i = 0 To name.count- 1

        If e.DataRow(name(i)) = e.DataRow.OriginalValue(name(i)) Then

            Else

    Dim dr As DataRow = DataTables("审计_变更明细").AddNew

        dr("GUID") = Vars("_Guid")

        dr("属性名称") = e.DataTable.DataCols(name(i)).Name

        dr("变更前") = e.DataRow.OriginalValue(name(i)) 

        dr("变更后") = e.DataRow(name(i)) 

dr.save

        End If

Next


 回到顶部