Outlook) (AppointmentItem.Respond 方法

會回覆會議邀請。

語法

expression。 Respond( _Response_ , _fNoUI_ , _fAdditionalTextDialog_ )

表達 代表 'AppointmentItem' 物件的變數。

參數

名稱	必要/選用	資料類型	描述
回應	必要	OlMeetingResponse	要求的回應。
fNoUI	選用	Variant	如果為 True，則不顯示對話方塊；該回應會自動傳送。 如果為 False，則會顯示回應的對話方塊。
fAdditionalTextDialog	選用	Variant	如果為 False，則不提示使用者進行輸入；回應會顯示在檢閱程式以供進行編輯。 如果為 True，則提示使用者傳送回應或傳送具有註解的回應。 只有當 fNoUI 為 False，才能使用這個引數。

傳回值

MeetingItem物件，表示會議邀請的回應。

註解

當您以 olMeetingAccepted 或 olMeetingTentative 參數呼叫 Respond 方法時，Outlook 將建立一個會複製原始約會項目的新約會項目。 此新項目將使用不同的項目 ID。 接著，Outlook 會移除原始的項目。 您不應該再使用原始專案的專案識別碼，而是改為呼叫 EntryID 屬性，以針對任何後續需求取得新專案的專案識別碼。 如果有一部以上的電腦會存取您的行事曆，但是偶爾會使用離線的快取模式，這項做法可以確保約會能正確地進行同步處理。

下表說明根據父物件之 Respond 方法的行為，以及 fNoUI 和 fAdditionalTextDialog 參數。

fNoUI、fAdditionalTextDialog	結果
True, True	回應項目是不使用任何使用者介面傳回的。 若要傳送回應，您必須呼叫 Send 方法。
True, False	結果與 True, True 相同。
False, True	先提示使用者 [傳送] 或 [編輯]，然後再傳送回覆。
False, False	新的回覆項目會顯示在使用者介面中，但不會顯示任何提示。

範例

這個 Visual Basic for Applications (VBA) 範例會在預設的 [收件匣] 資料夾中尋找MeetingItem，並將相關聯的約會新增至 [行事曆] 資料夾。 接著，透過接受會議回覆寄件者。

Sub AcceptMeeting() 
 Dim myNameSpace As Outlook.NameSpace 
 Dim myFolder As Outlook.Folder 
 Dim myMtgReq As Outlook.MeetingItem 
 Dim myAppt As Outlook.AppointmentItem 
 Dim myMtg As Outlook.MeetingItem 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox) 
 Set myMtgReq = myFolder.Items.Find("[MessageClass] = 'IPM.Schedule.Meeting.Request'") 
 If TypeName(myMtgReq) <> "Nothing" Then 
 Set myAppt = myMtgReq.GetAssociatedAppointment(True) 
 Set myMtg = myAppt.Respond(olResponseAccepted, True) 
 myMtg.Send 
 End If 
End Sub

另請參閱

AppointmentItem 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。