Метод Conversation.GetAlwaysDelete (Outlook)

Статья
04/07/2023

Возвращает константу в перечислении OlAlwaysDeleteConversation , которая указывает, будут ли все новые элементы, присоединяющиеся к диалогу, всегда перемещаться в папку "Удаленные" в указанном хранилище доставки.

Синтаксис

выражение. GetAlwaysDelete( _Store_ )

Выражение Переменная, представляющая объект Conversation.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Store	Обязательный	Магазин	Указывает хранилище, в котором хранится папка "Удаленные" , в которую перемещаются элементы беседы.

Возвращаемое значение

Константа из перечисления OlAlwaysDeleteConversation , указывающая, всегда ли все новые элементы диалога перемещаются в папку "Удаленные" указанного хранилища доставки.

Замечания

Если параметр Store указывает хранилище без доставки, например архивное PST-хранилище, метод GetAlwaysDelete возвращает константу из OlAlwaysDeleteConversation , которая применяется к элементам диалога в хранилище доставки по умолчанию. Элементы в хранилище без доставки не перемещаются в папку Удаленные для хранилища доставки по умолчанию.

Если GetAlwaysDelete возвращает olAlwaysDelete, элементы беседы всегда перемещаются в папку Удаленные для хранилища, содержащего эти элементы. В беседе между магазинами элементы перемещаются в папку Удаленные для хранилища, содержащего эти элементы. Когда GetAlwaysDelete возвращает olAlwaysDelete, метод GetAlwaysMoveToFolder возвращает объект folder, представляющий папку "Удаленные" для хранилища по умолчанию.

Если GetAlwaysDelete возвращает olAlwaysDeleteUnsupported, указанное хранилище не поддерживает действие постоянного перемещения элементов в папку "Удаленные" этого хранилища.

Если GetAlwaysDelete возвращает olDoNotDelete, новые элементы, поступающие в беседу, не перемещаются в папку Удаленные в указанном хранилище доставки, а существующие элементы беседы в папке "Удаленные" перемещаются в папку "Входящие".

Пример

В следующем примере Microsoft Visual Basic для приложений (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

См. также

Объект Conversation

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через