主题：[求助]全局表事件

我在项目的全局表事件datacolchanged 下写了如下代码

If e.DataTable.DataCols.Contains("_identify")
    Dim r As DataRow = DataTables("SY系统日志记录表").AddNew
    r("操作类型") = "更新操作"
    r("操作表名") = e.DataTable.Name
    r("操作列名") = e.DataCol.Name
    r("操作行号") = e.DataRow("_identify")
    r("旧值") = e.OldValue
    r("新值") = e.NewValue
    r.save
  End If

Initialize项目表事件代码

For Each dt As DataTable In DataTables  '打开全局表删除表事件,用于记录所有表删除修改记录信息
    dt.GlobalHandler.DataRowDeleting = True
    dt.GlobalHandler.BeforeSaveDataRow = True
    dt.GlobalHandler.DataColChanged = True
Next

为什么全局表事件没有运行呢，在日志表中没有发现新增数据

 你把这段代码，单独在命令窗口运行一次

 

For Each dt As DataTable In DataTables  '打开全局表删除表事件,用于记录所有表删除修改记录信息
    dt.GlobalHandler.DataRowDeleting = True
    dt.GlobalHandler.BeforeSaveDataRow = True
    dt.GlobalHandler.DataColChanged = True
Next

运行过了，不行

1、datacolchanged 第一行加上 msgbox(e.DataCol.name)

 

2、去任意一个表修改值测试。

 建议用保存前验证事件。

如果是窗口sqltable的表，在窗口afterload事件设置一下GlobalHandler

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:全局表事件.foxdb

帮我看看在表A或表B修改，在表C为什么没有新增数据

主键不包括再DataCols集合中，改为：

要学会调试分析：