主题：可否将不加载表的条件写到AfterOpenProject事件中？

Case "表A"
e.Cancel = (_UserGroup = "客服经理")

End Select

我的权限是通过全局代码设置的，Public _UserGroup As String     如果_UserGroup="客服经理“  则不准访问表A

不知道我说明白没有

表不加载,采取动态加载的方式

 

1、开始的时候，不要加载任何数据表；

 

2、在AfterOpenProject里面，判断_UserGroup去对应的加载对应的表，比如

 

 DataTables.Load("表A")

 DataTables.Load("表B")

明白了，多谢两位老师。

追问：我有很多表,在AfterOpenProject里面,我用_UserGroup做了判断，如果_UserGroup="经理" 全部加载，如果_UserGroup="项目经理" 那么加载表A、表B、表C、表D.

If _UserGroup = "经理" Then
    For Each tn As String In Connections("数据源名").GetTableNames
        DataTables.Load(tn)
    Next
Else If _UserGroup="项目经理" Then
    DataTables.Load("表A")
    DataTables.Load("表B")
    DataTables.Load("表C")
End If

 

明白了，那如何开始不加载任何表应在BeforeLoadOuterTable如何设置？

http://www.foxtable.com/help/topics/2752.htm