以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]麻烦修改,增加表A也不开启全局表事件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=123854)

--  作者:abc2363360
--  发布时间:2018/8/24 17:43:00
--  [求助]麻烦修改,增加表A也不开启全局表事件
If user.name = "电商导入" OrElse user.name = "外呼组长" OrElse user.name = "热线导入" Then
Else
    For Each dt As DataTable In DataTables
        If dt.Name <> "系统登陆日志表"  Then
            dt.GlobalHandler.DataColChanged = True \'开启全局表事件DataColChanged
            dt.GlobalHandler.BeforeDeleteDataRow = True  \'开启全局表事件BeforeDeleteDataRow
            dt.GlobalHandler.DataRowAdded = True  \'开启全局表事件DataRowAdded
        End If
    Next
End If

麻烦修改,增加表A也不开启全局表事件,谢谢!

--  作者:有点蓝
--  发布时间:2018/8/24 20:19:00
--  
增加表A后再次调用代码设置

If user.name = "电商导入" OrElse user.name = "外呼组长" OrElse user.name = "热线导入" Then
Else
            datatables("表A").GlobalHandler.DataColChanged = True \'开启全局表事件DataColChanged
            datatables("表A").GlobalHandler.BeforeDeleteDataRow = True  \'开启全局表事件BeforeDeleteDataRow
            datatables("表A").GlobalHandler.DataRowAdded = True  \'开启全局表事件DataRowAdded
End If

--  作者:abc2363360
--  发布时间:2018/8/27 10:31:00
--  
一楼我表达不清晰,

If user.name = "电商导入" OrElse user.name = "外呼组长" OrElse user.name = "热线导入" Then
Else
    For Each dt As DataTable In DataTables
        If dt.Name <> "系统登陆日志表"  Then
            dt.GlobalHandler.DataColChanged = True \'开启全局表事件DataColChanged
            dt.GlobalHandler.BeforeDeleteDataRow = True  \'开启全局表事件BeforeDeleteDataRow
            dt.GlobalHandler.DataRowAdded = True  \'开启全局表事件DataRowAdded
        End If
    Next
End If

麻烦修改,系统登陆日志表和表A    都不开启全局表事件,谢谢!

--  作者:有点甜
--  发布时间:2018/8/27 11:48:00
--  
If user.name = "电商导入" OrElse user.name = "外呼组长" OrElse user.name = "热线导入" Then
Else
    For Each dt As DataTable In DataTables
        If dt.Name <> "系统登陆日志表" andalso dt.name <> "表A" Then
            dt.GlobalHandler.DataColChanged = True \'开启全局表事件DataColChanged
            dt.GlobalHandler.BeforeDeleteDataRow = True  \'开启全局表事件BeforeDeleteDataRow
            dt.GlobalHandler.DataRowAdded = True  \'开启全局表事件DataRowAdded
        End If
    Next
End If

--  作者:abc2363360
--  发布时间:2018/8/27 17:04:00
--  
谢谢