你既然用自定义用户管理吗，系统自带的用户名当然就么有意义了，其实那段帮助已经告诉你了的：
经过上述10个步骤的设计，我们已经建立了自己的用户管理和登录系统，用户登录后，用户名保存在全局变量_User中，用户分组保存在全局变量_UserGroup中。
我们只需对原来的权限代码稍作修改，即可适用自定义的用户管理系统，例如原来的代码为：
If User.Group = "经理"
Then
DataTables("表A").AllowEdit = True
Else
DataTables("表A").AllowEdit = False
End
If
现在只需改为：
If _UserGroup = "经理"
Then
DataTables("表A").AllowEdit = True
Else
DataTables("表A").AllowEdit = False
End
If
可以看出，自定义的用户管理系统，在应用上和内置的不会有任何差别。
上面是用用户分组，如果你用的是用户名，那么将User.Name用_UserName代替即可，道理是一回事。
帮组中这个示例讲得非常详细，最后仔细看看。
加好友 
发短信
Post By：2010/9/1 9:58:00 [显示全部帖子]
