Foxtable(狐表)用户栏目专家坐堂 → 加载树与权限


  共有2505人关注过本帖树形打印复制链接

主题:加载树与权限

美女呀,离线,留言给我吧!
13775189031
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:833 积分:5783 威望:0 精华:0 注册:2017/12/19 14:46:00
加载树与权限  发帖心情 Post By:2019/8/27 13:11:00 [只看该作者]

Dim flt As String

If User.Group = "雇员" Then

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

End If

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


按以上设置加载树及权限,发现打开项目时没有问题,但在切换账户的情况下,无法重新加载,要怎么改?


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/27 13:41:00 [只看该作者]

代码放一份到LoadUserSetting事件

 回到顶部
美女呀,离线,留言给我吧!
13775189031
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:833 积分:5783 威望:0 精华:0 注册:2017/12/19 14:46:00
  发帖心情 Post By:2019/8/27 14:30:00 [只看该作者]

用目录树管理表 的窗口,如何实现开启项目后,自动打开?


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/27 14:44:00 [只看该作者]

afteropenproject事件
forms("窗口1").open

 回到顶部