以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助][建议]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75784)

--  作者:弘安公司
--  发布时间:2015/10/14 20:08:00
--  [求助][建议]
在当前用户为“管理员”下,怎样让管理员身份的用户不可以通过“用户管理窗口”修改其“用户角色”和“用户分组”为“开发者”?  或者代码切换用户时只调用“用户切换”窗口但不调用“用户管理”窗口”?  谢谢
[此贴子已经被作者于2015/10/14 20:19:09编辑过]

--  作者:大红袍
--  发布时间:2015/10/14 20:23:00
--  

管理员,是可以修改每个用户的用户角色的。没办法限制。

 

 


--  作者:弘安公司
--  发布时间:2015/10/14 20:28:00
--  
谢谢  那怎样实现代码切换用户时只调用“用户切换”窗口但不调用“用户管理”窗口”?
--  作者:弘安公司
--  发布时间:2015/10/14 20:34:00
--  
问题是管理员权限下调用“用户管理”窗口通过“修改”按钮 把管理员用户修改成“开发者”角色或用户组
--  作者:大红袍
--  发布时间:2015/10/14 20:36:00
--  

把菜单隐藏,如

 

RibbonTabs("Project").Groups("Users").Items("Users").Visible = False

 

或者

 

RibbonTabs("Project").Groups("Users").Items("Users").Enabled = False


--  作者:弘安公司
--  发布时间:2015/10/14 20:39:00
--  
好的  太谢谢了 不过管理员角色或用户组下不应允许修改成“开发者”角色或用户组
--  作者:弘安公司
--  发布时间:2015/10/14 20:53:00
--  
谢谢大红袍! 我是想调用“用户属性”窗口时,使“用户分组”和“用户角色”的下拉菜单False 只允许修改改密码 其他的都不允许修改 谢谢!
[此贴子已经被作者于2015/10/14 20:56:41编辑过]

--  作者:大红袍
--  发布时间:2015/10/14 20:59:00
--  

做一个计划任务,加上下面代码

 

Dim frm = windows.forms.form.activeform
If frm IsNot Nothing Then    
    If frm.name = "Class182" Then
        frm.controls("cmbGroups").Enabled = False
        frm.controls("cmbRoles").Enabled = False
    End If
End If


--  作者:弘安公司
--  发布时间:2015/10/14 21:05:00
--  
谢谢大红泡老师耐心的指教!