加载树与权限管理

 

OpenLoadTree方法的加最后一个参数Filter很容易被人忽视,这是一个条件表达式,一旦指定此参数,那么只会根据符合此条件的行生成加载树;单击加载树中的节点,也只会加载符合此条件的行。
 

例如,假定希望雇员分组的用户在登录之后,只加载自己负责的数据,可以将打开加载树的代码改为:

 

Dim flt As String

If User.Group = "雇员" Then

    flt = "雇员 = '" & User.Name & "'"

End If

Tables("订单").OpenLoadTree("日期 YM|产品",150,100,True,flt)


本页地址:http://www.foxtable.com/webhelp/topics/3275.htm