Foxtable(狐表)用户栏目专家坐堂 → 关于修改记录保存到列中


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

主题:关于修改记录保存到列中

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/17 23:15:00 [显示全部帖子]

DataColChanged事件

 

If e.datarow.RowState = DataRowState.Added Then
    e.DataRow("区域报表系统初始化_Log") = ""
Else
    e.DataRow("区域报表系统初始化_Log") &= vbcrlf & Date.now & " " & user.name & " 把【" & e.DataCol.Name & "】从'" & e.OldValue & "'修改成 '" & e.NewValue & "'"
End If


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/18 8:41:00 [显示全部帖子]

 贴出你对应datacolchanged的事件代码。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/18 10:06:00 [显示全部帖子]

If e.DataCol.name <> "区域报表系统初始化_Log" Then
    If e.DataRow.RowState = DataRowState.Added Then
        e.DataRow("区域报表系统初始化_Log") = ""
    Else
        e.DataRow("区域报表系统初始化_Log") &= vbcrlf & Date.now & " " & user.name & " 把【" & e.DataCol.Name & "】从'" & e.OldValue & "'修改成 '" & e.NewValue & "'"
    End If
   
End If


 回到顶部