以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于隐藏管理项目后修改登陆密码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=114749)

--  作者:kakawcj
--  发布时间:2018/2/21 0:05:00
--  [求助]关于隐藏管理项目后修改登陆密码
为了保护项目,在帮助文件中"菜单与权限管理"的以下代码可以让不是开发者的登陆者看到“管理项目”,但一般用户登陆后无法使用“管理项目”下的“用户管理”来修改自己的密码,怎么才能做到呢?

If User.Name <> "开发者" Then
    RibbonTabs("Table").Visible = False
    RibbonTabs("Project").Visible = False
    RibbonTabs("Other").Groups("Execute").Items("SQLExecute").Enabled = False
    RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = False
Else
    RibbonTabs("Table").Visible = True
    RibbonTabs("Project").Visible = True
    RibbonTabs("Other").Groups("Execute").Items("SQLExecute").Enabled = True
    RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = True
End If

--  作者:WELOVEFOX
--  发布时间:2018/2/21 12:32:00
--  
如果用户表是内置的,自定菜单或窗口按钮执行代码

Syscmd.Project.Users()

--  作者:有点甜
--  发布时间:2018/2/21 17:23:00
--  

你可以显示【Project】菜单,把不需要的功能组groups隐藏就好了呗。

 

或者是,可以自己定义菜单,把不需要的隐藏掉 http://www.foxtable.com/webhelp/scr/1079.htm