Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]表数据改动日志


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

主题：[求助]表数据改动日志
帅哥，在线噢！
YDS
 小大  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：628 积分：3594 威望：0 精华：0 注册：2011/5/21 18:05:00 		[求助]表数据改动日志  发帖心情 Post By：2018/7/25 15:49:00 [显示全部帖子]

想知道表数据谁在什么时间有改动，DataColChanged增加代码如下，结果就是有改动的时候项目自动卡、然后关闭，是什么原因？要如何解决？

If e.DataRow("Log") > "" Then
    e.DataRow("Log") = e.DataRow("Log") & vbcrlf & vars("用户") & "|" & Date.Now & "|" & e.DataCol.Name
Else
    e.DataRow("Log") = vars("用户") & "|" & Date.Now & "|" & e.DataCol.Name
End If
 回到顶部
帅哥，在线噢！
YDS
 小大  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：628 积分：3594 威望：0 精华：0 注册：2011/5/21 18:05:00 		  发帖心情 Post By：2018/7/25 16:25:00 [显示全部帖子]

非常感谢，忘记这个了

 回到顶部
帅哥，在线噢！
YDS
 小大  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：628 积分：3594 威望：0 精华：0 注册：2011/5/21 18:05:00 		  发帖心情 Post By：2018/7/25 16:27:00 [显示全部帖子]

Log里面的日志大于多少行或者大于多少字需要删除一下？

 回到顶部
帅哥，在线噢！
YDS
 小大  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：628 积分：3594 威望：0 精华：0 注册：2011/5/21 18:05:00 		  发帖心情 Post By：2018/7/25 17:02:00 [显示全部帖子]

If e.DataCol.Name <> "Log" Then
    If e.DataRow("Log") > "" Then
        e.DataRow("Log") = e.DataRow("Log") & vbcrlf & vars("用户") & "|" & Date.Now & "|" & e.DataCol.Name
        Dim n As Integer = e.DataRow("Log").Split(vbcrif)
        If n > 99 Then
           ' 删除第一行的代码怎么写
        End If
    Else
        e.DataRow("Log") = vars("用户") & "|" & Date.Now & "|" & e.DataCol.Name
    End If
End If
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 5 次数据查询