Conversation.StopAlwaysDelete 方法 (Outlook)

停止固定將所指定存放區中的交談項目移至該存放區 [刪除的郵件] 資料夾中的動作。

語法

expressionStopAlwaysDelete( _Store_ )

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

參數

名稱 必要/選用 資料類型 描述
Store 必要 Store 指定停止一律刪除動作所套用的存放區。

註解

如果尚未開啟一律刪除動作,StopAlwaysDelete 不會執行任何動作。

如果已藉由呼叫 SetAlwaysDelete 方法來開啟 (一律刪除動作, StopAlwaysDelete 會將 [刪除的郵件] 資料夾中的現有交談專案移至 [收件匣]。

為存放區中的交談呼叫 StopAlwaysDelete 方法之後,在該交談和存放區上呼叫 GetAlwaysDelete 方法會傳回常數 olDoNotDelete

如果 Store 參數指定的 存放 區代表非傳遞存放區,例如封存 .pst 存放區,則會將 stop-always-delete 動作套用至預設傳遞存放區中的交談專案。

在指定存放區中已位於 [刪除的郵件] 資料夾的交談上呼叫這個方法會傳回錯誤。

範例

下列 Visual Basic for Applications (VBA) 範例示範如何停止特定訊息項目交談的一律刪除動作。 程式碼範例 DemoStopAlwaysDelete 會選擇 [讀取窗格] 中顯示的第一個訊息項目作為特定訊息項目。 DemoStopAlwaysDelete 會確認訊息項目的存放區上已啟用交談、取得在交談存在時牽涉到該訊息項目的交談,並使用 SetAlwaysDelete 停止該存放區上該交談的一律刪除動作。

Sub DemoStopAlwaysDelete() 
 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.StopAlwaysDelete oStore 
 End If 
 End If 
End Sub

另請參閱

Conversation 物件

支援和意見反應

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