Foxtable(狐表)用户栏目专家坐堂 → 全局表datarow.added事件


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

主题:全局表datarow.added事件

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


加好友 发短信
等级:狐精 帖子:3361 积分:24802 威望:0 精华:0 注册:2012/3/26 21:47:00
全局表datarow.added事件  发帖心情 Post By:2016/8/4 14:36:00 [只看该作者]

Dim r As Row=Tables("日志").AddNew
r("操作时间")=Functions.Execute("北京时间")
r("操作人")=_UserName
r("表单名称")=e.DataTable.name
r("动作")=_UserName & "新增了一个临时ID为" & e.DataRow("_identify") & "的行"
r.save

在全局表事件 datarow.added中加入上面代码 只要触发程序就崩溃  什么原因

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


加好友 发短信
等级:版主 帖子:1693 积分:12135 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2016/8/4 14:40:00 [只看该作者]

你好歹得把日志表给排除掉啊

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


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

If e.DataTable.Name <> "日志" Then

 

End If


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


加好友 发短信
等级:狐精 帖子:3361 积分:24802 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2016/8/4 14:49:00 [只看该作者]

哟西  原来如此

 回到顶部