| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 权限设置 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=146124) |
| -- 作者：有点蓝 -- 发布时间：2020/2/17 11:14:00 -- 方法1、页签或者导航改为根据权限动态生成 2、根据权限显示和隐藏页签或者导航，如 If DataTables("权限").find("采购订单业务权限查询条件") Is Nothing Then Forms("窗口1").Controls("TopicBar1").Pages("采购订单业务").Visible = False Else Forms("窗口1").Controls("TopicBar1").Pages("采购订单业务").Visible = True End If |
| -- 作者：有点蓝 -- 发布时间：2020/2/18 8:53:00 -- If DataTables("权限设置").find("分组=\'xxx\' and 权限=\'xxx\' and 用户 like \'%xxx%\'") Is Nothing Then |