在 OlAlwaysDeleteConversation 列舉中回傳一個常數，指示所有加入對話的新項目是否都會被移到指定配送商店的 已刪除物品 資料夾。
語法
expression。
GetAlwaysDelete( _Store_ )
詞 一個代表「對話」物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Store | 必要 | Store | 指定存放區，以保存交談中項目所移入的 [刪除的郵件] 資料夾。 |
傳回值
這是 OlAlwaysDeleteConversation 列舉中的常數，指示對話中所有新項目是否都會被移至指定配送商店的已刪除項目資料夾。
註解
如果 Store 參數指定非配送儲存，例如 archive .pst store，GetAlwaysDelete 方法會從 OlAlwaysDeleteConversation 回傳一個常數，該常數適用於預設傳送儲存中的對話項目。 無法傳遞存放區上的項目不會移至該預設傳遞存放區的 [刪除的郵件] 資料夾。
如果 GetAlwaysDelete 傳回 olAlwaysDelete，交談的項目一律移至包含這些項目之存放區的 [刪除的郵件] 資料夾。 在跨存放區交談中，項目會移至包含這些項目之存放區的 [刪除的郵件] 資料夾中。 當 GetAlwaysDelete 傳回 olAlwaysDelete 時，GetAlwaysMoveToFolder 方法會傳回代表預設存放區之 [刪除的郵件] 資料夾的資料夾物件。
如果 GetAlwaysDelete 傳回 olAlwaysDeleteUnsupported，則指定的存放區不支援一律將項目移至該存放區之 [刪除的郵件] 資料夾的動作。
如果 GetAlwaysDelete 回傳 olDoNotDelete，對話中新抵達的項目不會移到指定配送商店的 已刪除項目 資料夾，而 已刪除項目 資料夾中的對話項目則會移到 收件匣。
範例
以下 Visual Basic for Application (VBA) 範例Microsoft示範如何驗證所選郵件項目對話的「始終刪除」設定。 程式碼範例 DemoGetAlwaysDelete，驗證預設儲存庫中已啟用對話，若有對話存在，則取得包含閱讀窗格中第一個郵件項目的對話，使用 GetAlwaysDelete 取得 always-delete 設定，並顯示該設定。
Sub DemoGetAlwaysDelete()
Dim oMail As Outlook.MailItem
Dim oConv As Outlook.Conversation
Dim oStore As Outlook.Store
Dim intValue As Integer
' Get the item displayed in Reading Pane.
Set oMail = ActiveExplorer.Selection(1)
If Application.Session.DefaultStore.IsConversationEnabled Then
Set oConv = oMail.GetConversation
If Not (oConv Is Nothing) Then
intValue = _
oConv.GetAlwaysDelete(Application.session.DefaultStore)
If intValue = _
Outlook.OlAlwaysDeleteConversation.olAlwaysDelete Then
Debug.Print "olAlwaysDelete"
ElseIf intValue = _
Outlook.OlAlwaysDeleteConversation.olAlwaysDeleteUnsupported Then
Debug.Print "olAlwaysDeleteUnsupported"
ElseIf intValue = _
Outlook.OlAlwaysDeleteConversation.olDoNotDelete Then
Debug.Print "olDoNotDelete"
End If
End If
End If
End Sub
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。