主题：授权问题

其它表格也需要有【业务员】列吧？或者是和【业务员】列相关。

然后代码这样写

If User.Name = "张经理" Then
    DataTables("订单").LoadFilter = ""
   
    DataTables("表A").LoadFilter = ""
   
    DataTables("表B").LoadFilter = ""
Else
    DataTables("订单").LoadFilter = "业务员 = '" & User.Name & "'"
   
    DataTables("表A").LoadFilter = "业务员 = '" & User.Name & "'"
   
    DataTables("表B").LoadFilter = "业务员 = '" & User.Name & "'"
End If
DataTables("订单").Load()

DataTables("表A").Load

DataTables("表B").Load

如果是父子表，用这种方式加载

http://www.foxtable.com/webhelp/scr/2894.htm

http://www.foxtable.com/webhelp/scr/2228.htm