主题：动态加载表后目录树如何设计

 
此主题相关图片如下：1.png

If _UserRole ="超级管理员" Then
    DataTables("person").LoadFilter = ""
    DataTables("organList").LoadFilter = ""
    DataTables("history").LoadFilter = ""
    DataTables("user").LoadFilter = ""
ElseIf _UserRole ="管理员" Then
    DataTables("person").LoadFilter = "organ = '" & _UserOrgan & "'"
    DataTables("organList").LoadFilter = "organName = '" & _UserOrgan & "'"
    DataTables("history").LoadFilter = "organ= '" & _UserOrgan & "'"
    DataTables("user").LoadFilter = "userOrgan = '" & _UserOrgan & "'"
ElseIf(_UserRole ="操作员")Then
    DataTables("person").LoadFilter = "organ = '" & _UserOrgan & "'"
    DataTables("organList").LoadFilter = "organName = '" & _UserOrgan & "'"
    DataTables("history").LoadFilter = "organ= '" & _UserOrgan & "'"
    DataTables("user").LoadFilter = "userOrgan = '" & _UserOrgan & "'"
Else
      Messagebox.show("当前用户角色为空!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

DataTables("person").Load()
DataTables("organList").Load()
DataTables("history").Load()
DataTables("user").Load()

上面是用户登录窗口确定按钮的代码，当选择西安分行的管理员后，单位表就只动态加载那一行，切换用户时，单位是下拉目录树为空？

1、单位表，有必要动态加载么？如果需要正常使用的表格，数据都加载出来吧。

2、你可以用临时表处理，比如 http://www.foxtable.com/webhelp/scr/2054.htm

进行权限控制，本单位的管理员只能看到本单位的数据，包括干部信息，单位信息，用户信息

如果本单位管理员可以看到本单位和下级单位的数据，操作员只能看到本单位的数据？这咋设置

你本来的数据是怎样的？某一个用户进入以后，你希望得到的数据是怎样的？

能否根据【机构编码】来设置加载条件？比如 "机构编码 Like 'abc123%'"