Email VBA：当前Windows登录用户'；s交换电子邮件地址

我有一个MS Access 2003应用程序，需要当前Windows登录用户的exchange电子邮件地址

我需要查询Active Directory才能执行此操作，还是有更简单的方法？ 我们的组织中有不同的域，查询AD会很麻烦

谢谢，

---

Bruno

您可以通过VBA使用环境变量来检索它

---

例如，如果您知道您的用户以“firstname”登录系统。lastname@exchange.com'环境将为您提供'FirstName.LastName'，然后您可以在末尾添加exchange电子邮件

您可以通过VBA使用环境变量来检索此信息

---

例如，如果您知道您的用户以“firstname”登录系统。lastname@exchange.com'环境将为您提供'FirstName.LastName'，然后您可以在末尾添加exchange电子邮件

1）如果当前Windows用户在电脑上运行Outlook，并且只连接到自己的邮箱，则设置可能位于注册表中HKEY_current_user\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles下的某个位置。2）为什么需要搜索不同的域？您是否只搜索当前用户登录的一个域以查找其帐户和主要电子邮件地址？1）如果当前Windows用户已在PC上运行Outlook并仅连接到其自己的邮箱，则设置可能位于HKEY_current_user\Software\Microsoft\Windows下的某个注册表中NT\CurrentVersion\Windows消息传递子系统\Profiles.2）为什么需要搜索不同的域？你会不会只搜索当前用户登录的一个域，然后找到他们的帐户和主要电子邮件地址？但这本身就不可靠。任何人都可以打开一个命令提示符并键入SET语句来分配他们喜欢的任何环境变量，然后从该命令提示符启动Access。这是一种选择，可能不是最好的，但这是一种选择，但这本身就不可靠。任何人都可以打开一个命令提示符并键入SET语句来分配他们喜欢的任何环境变量，然后从该命令提示符启动Access。这是一个选项，可能不是最好的，但它是一个选项