Conversation.StopAlwaysDelete 方法 (Outlook)
停止固定將所指定存放區中的交談項目移至該存放區 [刪除的郵件] 資料夾中的動作。
語法
expression。 StopAlwaysDelete( _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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。