Access快速开发平台--实现当前登录用户不是系统管理员时，用户新增，角色不能看到系统管理员选项；非管理员新增用户帐号将系统管理员排除设置的方法

时　间:2023-04-28 10:32:14
作　者:杨雪   ID：42182  城市：南京
摘　要:实现当前登录用户不是系统管理员时，用户新增，角色不能看到系统管理员选项。
正　文:

一、学员问题描述：

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

效果图：

非系统管理员角色账号登录，新增界面，如下图: