以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]菜单权限管理问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=150130)

--  作者:wyb_79
--  发布时间:2020/5/21 15:38:00
--  [求助]菜单权限管理问题
在菜单系统事件的LoadUserSetting中加入以下代码:
If _UserName = "赵一" Then
    RibbonTabs("Table").Visible = True
    RibbonTabs("Project").Visible = True
    RibbonTabs("Other").Groups("Execute").Items("SQLExecute").Enabled = True
    RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = True
Else
    RibbonTabs("Table").Visible = False
    RibbonTabs("Project").Visible = False
    RibbonTabs("Other").Groups("Execute").Items("SQLExecute").Enabled = False
    RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = False
End If

想实现除用户赵一外,其余用户登陆时隐藏“数据表”和“管理项目”两个功能区,并禁用“执行SQL”和“命令窗口”两个按钮。

现在出现的问题是,当我用除赵一外其他用户直接打开项目时,此代码功能可以实现,但是我切换成赵一时,菜单不会发生变化,依旧是隐藏“数据表”和“管理项目”两个功能区,并禁用“执行SQL”和“命令窗口”两个按钮;当我用赵一登陆时,菜单不会实现代码功能,当我切换成别的用户时,菜单也不会隐藏“数据表”和“管理项目”两个功能区,也不会对其他用户禁用“执行SQL”和“命令窗口”两个按钮。

这是怎么回事儿?求教~~~





--  作者:有点蓝
--  发布时间:2020/5/21 15:49:00
--  
自己做的登录窗口切换用户,是不会触发LoadUserSetting事件的。各种控制请放到登录窗口的确定按钮里
--  作者:wyb_79
--  发布时间:2020/5/21 15:51:00
--  
收到,谢谢~~~