Conversation.GetAlwaysDelete 方法 (Outlook)
會傳回 OlAlwaysDeleteConversation 列舉中的常數，指出加入交談的所有新專案是否一律移至指定傳遞存放區中的 [ 刪除的郵件 ] 資料夾。
語法
expression。 GetAlwaysDelete( _Store_ )
表達 代表'Conversation' 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Store | 必要 | Store | 指定存放區，以保存交談中項目所移入的 [刪除的郵件] 資料夾。 |
傳回值
OlAlwaysDeleteConversation列舉中的常數，指出交談的所有新專案是否一律移至指定傳遞存放區的 [刪除的郵件] 資料夾。
註解
如果 Store 參數指定非傳遞存放區，例如封存 .pst 存放區， GetAlwaysDelete 方法會從 OlAlwaysDeleteConversation 傳回常數，該常數會套用至預設傳遞存放區中的交談專案。 無法傳遞存放區上的項目不會移至該預設傳遞存放區的 [刪除的郵件] 資料夾。
如果 GetAlwaysDelete 傳回 olAlwaysDelete，交談的項目一律移至包含這些項目之存放區的 [刪除的郵件] 資料夾。 在跨存放區交談中，項目會移至包含這些項目之存放區的 [刪除的郵件] 資料夾中。 當 GetAlwaysDelete 傳回 olAlwaysDelete 時，GetAlwaysMoveToFolder 方法會傳回代表預設存放區之 [刪除的郵件] 資料夾的資料夾物件。
如果 GetAlwaysDelete 傳回 olAlwaysDeleteUnsupported，則指定的存放區不支援一律將項目移至該存放區之 [刪除的郵件] 資料夾的動作。
如果 GetAlwaysDelete 傳 回 olDoNotDelete，則抵達交談的新專案不會移至指定傳遞存放區上的 [ 刪除的郵件 ] 資料夾，而 [ 刪除 的郵件] 資料夾中的現有交談專案會移至 [收件匣]。
範例
下列 Microsoft Visual Basic for Application (VBA) 範例示範如何驗證所選訊息項目的交談一律刪除設定。 程式碼範例 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 支援與意見反應。