Office中国论坛/Access中国论坛

标题: 在自定义菜单中,如何设置权限,即当具有管理员权限的用户登陆时可用,其它用户不可用? [打印本页]

作者: chenlugen    时间: 2008-8-5 20:48
标题: 在自定义菜单中,如何设置权限,即当具有管理员权限的用户登陆时可用,其它用户不可用?
请教各位大侠,在自定义菜单中,如何设置权限,即只有当具有管理员权限的用户登陆时可用,其它性质用户登陆时不可用???????
作者: 咱家是猫    时间: 2008-8-5 21:21
在程序启动过程中 或 在主窗体打开事件中 执行类似如下代码...
CommandBars("您的菜单名").Controls("文件(&F)").Controls("系统设置(&E)...").Enabled = (登录者权限级别变量="管理员")
作者: chenlugen    时间: 2008-8-6 09:08
好像不行啊,我登陆窗口只是有用户名和密码两项,"用户性质"(分管理员和操作员)只在用户密码表中,登陆后进入如图的界面,在这个界面中,我想实现只有当具有管理员权限的用户 登陆后我自定义菜单中的某些才能用??????
作者: chenlugen    时间: 2008-8-6 09:11
file:///C:/Documents%20and%20Settings/Administrator/桌面
作者: chenlugen    时间: 2008-8-8 21:09
if....... then

Application.CommandBars("OptionInterpose").Controls("用户设置(&U)").Enabled = True

else

Application.CommandBars("OptionInterpose").Controls("用户设置(&U)").Enabled = False

end if




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3