- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]禁止打开下拉菜单 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52760)
-- 发布时间：2014/6/22 19:15:00
-- [求助]禁止打开下拉菜单
我在配置栏中下图位置设置了公式；目的就是当 _UserGroup <> "特级管理员" 才可以打开，如果不是的话，按下按钮就弹出提示并且不打开下拉菜单；下面公式有弹出提示、但是还是打开下拉菜单啦，公式少了什么？
此主题相关图片如下：1112.jpg
If User.Type <> UserTypeEnum.Developer AndAlso User.Type <> UserTypeEnum.Administrator AndAlso _UserGroup <> "特级管理员" Then
MessageBox.Show("非开发人员无权操作", "提示", MessageBoxButtons.OK, MessageBoxIcon.Question)
End If
-- 发布时间：2014/6/22 19:18:00
--
呃，你直接在LoadUserSetting事件禁用这个菜单就好
http://www.foxtable.com/help/topics/2438.htm
-- 发布时间：2014/6/22 19:18:00
--
If User.Type <> UserTypeEnum.Developer AndAlso User.Type <> UserTypeEnum.Administrator AndAlso _UserGroup <> "特级管理员" Then
MessageBox.Show("非开发人员无权操作", "提示", MessageBoxButtons.OK, MessageBoxIcon.Question)
return
End If
-- 发布时间：2014/6/22 21:59:00
--
禁用这个菜单的话，我又希望 _UserGroup <> "特级管理员"这个用户可以打开，怎么办
-- 发布时间：2014/6/22 22:02:00
--
以下是引用wumingrong1在2014-6-22 21:59:00的发言：
禁用这个菜单的话，我又希望 _UserGroup <> "特级管理员"这个用户可以打开，怎么办
禁用这个菜单的话，我又希望 _UserGroup <> "特级管理员"这个用户可以打开，怎么办
你在打开项目，登陆之后，根据_UserGroup控制是否禁用不是就可以了？
-- 发布时间：2014/6/22 23:10:00
--
具体该怎么写？
If User.Type <> UserTypeEnum.Developer AndAlso User.Type <> UserTypeEnum.Administrator AndAlso _UserGroup <> "特级管理员" Then 配置栏、切换分公司（菜单按钮）=False Else配置栏、切换分公司（菜单按钮）=
True End If |
-- 发布时间：2014/6/22 23:37:00
--
参考 http://www.foxtable.com/help/topics/1526.htm