Foxtable(狐表)用户栏目专家坐堂 → 求助


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

主题:求助

帅哥哟,离线,有人找我吗?
巷弄太过弯曲
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:219 积分:1800 威望:0 精华:0 注册:2019/2/16 10:17:00
求助  发帖心情 Post By:2019/4/15 13:20:00 [只看该作者]

老师,请问操作日志删除行代码怎么写

增加行代码是:If e.DataTable.Name <> "数据操作日志" Then
    Dim dr As DataRow = DataTables("数据操作日志").AddNew
    dr("ID") = e.DataRow("_Identify")
    dr("用户") = _UserName
    dr("涉及表") = e.DataTable.Name
    dr("涉及列") = Nothing
    dr("涉及行") = e.DataRow("_Identify")
    dr("时间") = Date.Now
    dr("操作") = "增加了一行"
    Dim str As String = ""
    For Each c As DataCol In e.DataTable.DataCols
        str += c.Name & "=" & e.DataRow(c.Name) & "|"
    Next
    dr("原行数据") = str
End If

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/15 15:13:00 [只看该作者]

 

一样这样写,代码写到datarowdeleting事件,即可。

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
巷弄太过弯曲
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:219 积分:1800 威望:0 精华:0 注册:2019/2/16 10:17:00
  发帖心情 Post By:2019/4/15 16:18:00 [只看该作者]

以下是引用有点甜在2019/4/15 15:13:00的发言:

 

一样这样写,代码写到datarowdeleting事件,即可。

 

 老师 好像没效果,是不是要改项目事件 maintablechanged事件  这个事件代码现在写的是:For Each dt As DataTable In DataTables

    dt.GlobalHandler.DataColChanged = True

    dt.GlobalHandler.DataRowAdded = True

Next


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/15 16:45:00 [只看该作者]

加上

 

dt.GlobalHandler.DataRowDeleting = True

 

 


 回到顶部