如果禁用宏，如何获取用户名？

Question

我想为Access 2010设置启动属性，以适应用户的权限级别。例如，我在dtb表中有用户列表及其权限。据此我想为标准用户隐藏导航窗格等，并为管理员显示。用户名基于API用户名。但是，如果用户在Access启动后不允许宏，则获取用户名的VBA函数在AutoExec宏中不起作用。

我怎么能管理这个？感谢

马丁

Answer 1

环境变量包含诸如用户名，计算机名，临时文件夹的默认文件路径等内容

Environ("username")
Environ("computername")
Environ("temp")

修改：

将VBA功能放在模块下面

Public Function CurrentUsername() As String
    CurrentUsername = Environ("username")
End Function

然后在您的宏中，只要您想要将其与某些内容进行比较，就会引用CurrentUsername()（如果您想使用SetTempVars，则必须修改变量以使用引号输出）