有没有办法使用VBA从Outlook配置文件中删除额外的邮箱？

Question

我们正在将邮箱从我们的多林环境中的Exchange组织迁移到Exchange Online。当我们从其中一个林中迁移共享邮箱，并且用户将该邮箱映射到其配置文件时，这会导致迁移后出现多个用户体验问题，因为配置文件正在查找不再存在的邮箱。我们希望找到一种方法，通过从他们的配置文件中删除该邮箱，以编程方式更新那些可以访问此邮箱的人的配置文件。到目前为止，还没有找到解决方案。我没有使用VBA的经验，但其他人建议它可能会工作。有人知道怎么做这样的事吗？

Answer 1

Outlook对象模型不允许您删除委派存储。您可以使用扩展的MAPI (C++或Delphi)或Redemption (任何语言)。在赎回的情况下，您可以使用RDOStore.Remove方法:创建一个RDOSession对象的实例，从Outlook中将其MAPIOBJECT属性设置为Application.Session.MAPIOBJECT (这将确保赎回和Outlook使用相同的MAPI会话)，循环遍历RDOSession.Stores集合，通过名称或通过检查存储类型名称(TypeName()将返回"RDOExchangeDelegateMailboxStore")找到有问题的存储，调用RDOStore.Remove。

也可以在不运行Outlook或通过使用MAPI库(随可分发版本的赎回)登录到配置文件的情况下删除存储，但这涉及更多，因为ProfMan要求对存储在ProfMan中的配置方式有较低层次的了解。