一、学员问题描述:
VIP银卡会员:上海--Coral 09:50:23
老师,如何实现当前登录用户不是系统管理员,用户新增时,不能看到系统管理员的选项,如下图:
二、解决方法:
可以修改系统SysFrmUser_Edit窗体的这段代码为:
代 码:
If GetParameter("Current User UserRole") Like "*系统管理员*" Then
MultiSelectFor Me.UserRole, LookupItemSQL("User Role")
Else
MultiSelectFor Me.UserRole, "Select Value FROM Sys_LookupList Where Item='User Role' AND Value<>'' and SN<>1 order by SN"
End If
效果图:
非系统管理员角色账号登录,新增界面,如下图: