以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]Ribbon按钮设置不起作用 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134200) |
-- 作者:martin723 -- 发布时间:2019/4/29 15:56:00 -- [求助]Ribbon按钮设置不起作用 此段代码放在项目的LoadUserSetting和菜单的LoadUserSetting里面,都不起作用,按键始终能用。 怎样才能使只有开发者、管理员、生产日报管理员角色登录时按键能用,其他登录用户不能使用? If user.Roles.Contains("生产日报_管理员") OrElse UserTypeEnum.Developer OrElse UserTypeEnum.Administrator Then RibbonTabs("Common").Groups("功能组1").Items("上传数据").Enabled = True Else RibbonTabs("Common").Groups("功能组1").Items("上传数据").Enabled = False End If
|
-- 作者:有点甜 -- 发布时间:2019/4/29 15:59:00 -- If user.Roles.Contains("生产日报_管理员") OrElse user.type = UserTypeEnum.Developer OrElse user.type = UserTypeEnum.Administrator Then |
-- 作者:martin723 -- 发布时间:2019/4/29 16:00:00 -- 谢谢! |