- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]自定义用户管理的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53397)
-- 发布时间：2014/7/7 11:21:00
-- [求助]自定义用户管理的问题
自定义用户管理中，用户管理窗口的权限如何设置，实现如下目标：
If _UserGroup = "系统管理员" Then
打开用户管理窗口
If _UserGroup <> "系统管理员" Then
打开修改用户密码窗口
-- 发布时间：2014/7/7 11:24:00
--
你可以在对应的菜单那里，写入对应的代码。
If _UserGroup = "系统管理员" Then
打开用户管理窗口
Else
打开修改用户密码窗口
End If
-- 发布时间：2014/7/7 11:52:00
-- 回复：（有点甜） 你可以在对应的菜单那里，写入...
If _UserGroup = "系统管理" Then
Forms("UserGL").Open()
Else
Forms("UserMM").Open()
End If
写入上述代码后，以“系统管理员”（属于“系统管理”组）登录，任然是打开修改密码窗口
-- 发布时间：2014/7/7 11:54:00
--
加入代码看一下
msgBox(_UserGroup & "|" & user.Group)
If _UserGroup = "系统管理" Then
Forms("UserGL").Open()
Else
Forms("UserMM").Open()
End If
-- 发布时间：2014/7/7 12:09:00
-- 回复：（有点甜）?加入代码看一下?msgB...
还是不行，不知什么原因
此主题相关图片如下：qq截图20140707120521.png
<!--[endif]-->
[此贴子已经被作者于2014-7-7 15:00:54编辑过]