| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 修改记录 限制条件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97944) |
| -- 作者：zchlln -- 发布时间：2017/3/21 14:11:00 -- 修改记录 限制条件 If e.DataCol.name <> "修改记录" + "第九列" + "第八列" Then e.DataRow("修改记录") &= vbcrlf & Date.now & " " & user.name & " 把【" & e.DataCol.Name & "】从\'" & e.OldValue & "\'修改成 \'" & e.NewValue & "\'" End If 一运行就卡死呢 我想让 修改记录 和不重要的信息 不参与数据修改记录
|
| -- 作者：有点色 -- 发布时间：2017/3/21 14:28:00 -- Select Case e.DataCol.name
Case "修改记录", "第九列", "第八列"
Case Else
e.DataRow("修改记录") &= vbcrlf & Date.now & " " & user.name & " 把【" & e.DataCol.Name & "】从\'" & e.OldValue & "\'修改成 \'" & e.NewValue & "\'"
End Select
|