Outlook 会议请求自动接受和删除

Question

我们需要发送大量会议请求。我们想防止用户接受大量会议请求，所以我在网上找到了以下脚本来自动接受会议，然后从收件箱中删除。这是脚本：

Sub AutoAcceptMeetings(oRequest As MeetingItem)

If oRequest.MessageClass <> "IPM.Schedule.Meeting.Request" Then
  Exit Sub
End If

Dim oAppt As AppointmentItem
Set oAppt = oRequest.GetAssociatedAppointment(True)

Dim oResponse
 Set oResponse = oAppt.Respond(olMeetingAccepted, True)
 oResponse.Send

oRequest.Delete

End Sub

我现在需要的是，当接收到主题行中带有指定标题的会议请求时，强制我们交换中的所有邮箱运行此脚本。

Answer 1

您需要创建一个运行该代码的 COM 插件，并将其安装在您想要自动接受会议请求的所有计算机上。

如果您不想检查请求的主题，您可以将每个邮箱配置为自动接受所有请求（文件 | 选项 | 日历 | 自动接受或拒绝）。