如果激活自动回复，则从Outlook电子邮件中删除收件人

Question

我有一个生成并发送电子邮件的VBA脚本。有时，电子邮件的某些收件人不在办公室并且启用了自动回复。由于电子邮件的内容与不在办公室的人无关，我想删除这些特定的收件人。所有电子邮件收件人都在同一个MS Exchange服务器中。反正有没有执行此操作？感谢

Answer 1

你可以

1. 使用Exchange Web服务API检索OOF状态

2. 使用扩展MAPI（仅限C ++或Delphi）打开其他用户的邮箱（IMsgStore）并读取PR_OOF_STATE属性。

3. 使用Redemption（任何语言;免责声明：我是Redemption开发人员）并使用RDOExchangeMailboxStore.OutOfOfficeAssistant或使用RDOStore读取PR_OOF_STATE属性.Fields []。要打开其他用户的邮箱，您可以使用RDOSession.GetSharedMailbox。

4. <强>更新即可。请注意，＃2和＃3需要对相关邮箱的访问权限。当您要发送到的收件人为OOF时，您可以执行Outlook在横幅中显示邮件提示时所执行的操作。使用EWS和GetMailTips操作。 Redemption通过RDOAddressEntry。GetMailtips和RDOMailTips对象公开此功能。