共用方式為


Outlook) (Conversation.SetAlwaysDelete 方法

指定指定之傳遞存放區的設定,指出是否一律將所有現有的專案和所有抵達交談的新專案移至指定傳遞存放區中的 [刪除的郵件] 資料夾。

語法

expressionSetAlwaysDelete( _AlwaysDelete_ , _Store_ )

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

參數

名稱 必要/選用 資料類型 描述
AlwaysDelete 必要 OlAlwaysDeleteConversation 一個常數,指出送達交談的所有現有項目和所有新項目是否一律移至 Store 參數所指定存放區的 [刪除的郵件] 資料夾。
Store 必要 Store 指定包含 [刪除的郵件] 資料夾的存放區,交談的現有和新項目都會移入該資料夾。

註解

SetAlwaysDelete 方法會在由 Store 參數所指定傳遞存放區中的交談項目上運作。 如果 Store 參數所指定的存放區代表無法傳遞的存放區 (例如封存的 .pst 存放區),則此動作會套用至預設傳遞存放區中的交談項目。

如果 AlwaysDelete 參數是 olAlwaysDelete,交談專案會移至指定存放區的 [刪除的郵件] 資料夾。 在此情況下,除非使用者已指定在 Microsoft Outlook 關閉時永久刪除專案的個別選項,否則不會永久刪除專案。

如果 SetAlwaysDelete 傳olDoNotDelete,則抵達交談的現有交談專案和新專案不會移至指定傳遞存放區中的 [刪除的郵件] 資料夾,而 [刪除的郵件] 資料夾中的現有交談專案會移至 [收件匣]。

範例

下列 Visual Basic for Applications (VBA) 範例示範如何設定特定訊息項目交談的 always-delete 設定。 程式碼範例 DemoSetAlwaysDelete 會選擇 [讀取窗格] 中顯示的第一個訊息項目作為特定訊息項目。 DemoSetAlwaysDelete 會確認已在訊息項目的存放區中啟用交談、取得在交談存在時牽涉到該訊息項目的交談,並使用 SetAlwaysDelete 一律將該交談的現有和新專案移至相同存放區中的 [刪除的郵件] 資料夾。

Sub DemoSetAlwaysDelete() 
 Dim oMail As Outlook.MailItem 
 Dim oConv As Outlook.Conversation 
 Dim oStore As Outlook.Store 
 
 ' Get the item displayed in the 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 
 oConv.SetAlwaysDelete _ 
 olAlwaysDelete, oStore 
 End If 
 End If 
End Sub

另請參閱

Conversation 物件

支援和意見反應

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