| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于日志 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=87840) |
| -- 作者：lk15502 -- 发布时间：2016/7/21 8:01:00 -- 关于日志 如何把删除行的信息，写到日志；还有在表中有一个“”库存时间“”的列，根据入库时间而来，每天打开项目自动更新，日志会记录所有的有关变动信息，怎么不记录到日志， |
| -- 作者：Hyphen -- 发布时间：2016/7/21 9:01:00 -- 1.DataRowDeleting事件记录：http://www.foxtable.com/webhelp/scr/0633.htm 2.放出您的代码看看。如果是表达式列不会触发DataColChanged事件
|
| -- 作者：lk15502 -- 发布时间：2016/7/21 9:11:00 -- 我放在datarowdeleted事件中，每次都记录时间，其他都是空的 \'Select Case e.DataTable.Name \'Case "数据操作日志" \'Case Else \'Dim dr As DataRow = DataTables("数据操作日志").AddNew() \'Select Case e.DataTable.name \'Case "入库表" \'dr("用户") = User.Name \'dr("涉及表") = e.DataTable.Name \'dr("涉及行") = e.DataRow("_Identify") \'dr("时间") = Date.Now \'dr("涉及编号") = e.DataRow("入库编号") \'dr("操作") = "删除行" \'Case "库存表" \'dr("用户") = User.Name \'dr("涉及表") = e.DataTable.Name \'dr("涉及行") = e.DataRow("_Identify") \'dr("时间") = Date.Now \'dr("涉及编号") = e.DataRow("入库编号") \'dr("操作") = "删除行" \'Case "出库表" \'dr("用户") = User.Name \'dr("涉及表") = e.DataTable.Name \'dr("涉及行") = e.DataRow("_Identify") \'dr("时间") = Date.Now \'dr("涉及编号") = e.DataRow("出库编号") \'dr("操作") = "删除行" \'End Select \' \'End Select |
| -- 作者：lk15502 -- 发布时间：2016/7/21 9:12:00 -- 全局表事件中 |
| -- 作者：大红袍 -- 发布时间：2016/7/21 9:18:00 -- 写到DataRowDeleting事件，不是DataRowDeleted |
| -- 作者：lk15502 -- 发布时间：2016/7/21 11:59:00 -- 还有在表中有一个“”库存时间“”的列，根据入库时间而来，每天打开项目自动更新，日志会记录所有的有关变动信息，怎么不记录到日志， |
| -- 作者：大红袍 -- 发布时间：2016/7/21 12:18:00 -- 以下是引用lk15502在2016/7/21 11:59:00的发言：
还有在表中有一个“”库存时间“”的列，根据入库时间而来，每天打开项目自动更新，日志会记录所有的有关变动信息，怎么不记录到日志，
SystemReady = False
\'你自动更新的代码
SystemReady = True |
| -- 作者：lk15502 -- 发布时间：2016/7/21 13:58:00 -- 是不是这样就可以了，加了：datatables("库存表“).save 因为有录入窗口，有行状态的比较不保存，不能关闭 systemready = False DataTables("库存表").DataCols("入库日期").RaiseDataColChanged() systemready = True DataTables("库存表").save
|
| -- 作者：大红袍 -- 发布时间：2016/7/21 14:15:00 -- 8楼那样写代码，有什么问题？ |
| -- 作者：lk15502 -- 发布时间：2016/7/21 14:26:00 -- 目前没有发现问题 |