我怎么能默默地拒绝会议呢？

Question

我目前有一个脚本,我绑定到一个规则,以便我可以自动拒绝某些主题的会议请求:

Sub AutoDeclineMeetings(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(olMeetingDeclined, True)
 oResponse.Send

End Sub

但是,这会向会议组织者发送回复,这会对他们造成不必要的反应,因为他们不在乎我是否参加.

如何更改此代码,以便会议不会显示在我的日历中,从而不会发送任何响应？我试着简单地调用既oAppt.Delete和oRequest.Delete,但不会从我的日历中删除该项目.

实际上,我正在寻找的相当于在会议请求中手动选择拒绝 - >不发送响应.

Answer 1

与其做oResponse.Send，不如尝试oResponse.Close(olDiscard)