Conversation.GetAlwaysMoveToFolder 方法 (Outlook)

會傳回 Folder 物件，指出指定之傳遞存放區中一律會將抵達交談中的新專案移至其中的資料夾。

語法

expression。 GetAlwaysMoveToFolder( _Store_ )

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

參數

名稱	必要/選用	資料類型	描述
Store	必要	Store	存放已移動之交談項目的存放區。

傳回值

指定存放區中的 Folder 物件，一律會將抵達交談中的所有新專案移至其中。

註解

如果 Store 參數代表無法傳遞的存放區 (例如封存的 .pst 存放區)，則 GetAlwaysMoveToFolder 方法會傳回套用至預設傳遞存放區中之交談項目的 Folder 物件。

如果沒有指定 [ 刪除的郵件 ] 資料夾以外的資料夾一律將交談專案移至其中， GetAlwaysMoveToFolder 方法會在 Visual Basic) 中傳回 Null (Nothing 。

範例

下列 Microsoft Visual Basic for Application (VBA) 範例示範如何尋找資料夾，其中一律會將抵達 [讀取窗格] 中第一個訊息項目交談的新專案移至其中。 程式碼範例 DemoGetAlwaysMoveToFolder 會確認已在所選訊息項目的存放區中啟用交談、如果交談存在，則取得該訊息項目的交談物件、使用 GetAlwaysMoveToFolder 取得資料夾，並顯示資料夾名稱。

Sub DemoGetAlwaysMoveToFolder() 
 
 Dim oMail As Outlook.MailItem 
 
 Dim oConv As Outlook.Conversation 
 
 Dim oStore As Outlook.Store 
 
 
 
 ' Get Item displayed in Reading Pane. 
 
 Set oMail = ActiveExplorer.Selection(1) 
 
 Set oStore = oMail.Parent.Store 
 
 If oStore.IsConversationEnabled Then 
 
 Set oConv = oMail.GetConversation 
 
 If Not (oConv Is Nothing) Then 
 
 Dim oFolder As Outlook.folder 
 
 Set oFolder = _ 
 
 oConv.GetAlwaysMoveToFolder(oStore) 
 
 If Not (oFolder Is Nothing) Then 
 
 Debug.Print "MoveToFolder: " & oFolder.name 
 
 Else 
 
 Debug.Print "MoveToFolder action not set" 
 
 End If 
 
 End If 
 
 End If 
 
End Sub

另請參閱

Conversation 物件

支援和意見反應

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