Метод Attachments.Add (Outlook)

Статья
04/07/2023

Создает новое вложение в коллекции Attachments .

Синтаксис

expression. Add (Source, Type, Position, DisplayName)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Source	Обязательный	Variant	Источник вложения. Это может быть файл (представленный полным путем к файловой системе с именем файла) или элемент Outlook, составляющий вложение.
Type	Необязательный	Long	Тип вложения. Может быть одной из констант OlAttachmentType .
Position	Необязательный	Long	Этот параметр применяется только к сообщениям электронной почты в формате форматированного текста: это позиция, в которой вложение должно быть помещено в основной текст сообщения. Значение 1 для параметра Position указывает, что вложение должно располагаться в начале текста сообщения. Значение "n" больше, чем число символов в тексте элемента электронной почты, указывает, что вложение должно быть размещено в конце. Значение 0 делает вложение скрытым.
DisplayName	Необязательный	String	Этот параметр применяется только в том случае, если почтовый элемент имеет формат форматированного текста, а для параметра Type задано значение olByValue : имя отображается в объекте Inspector для вложения или при просмотре свойств вложения. Если почтовый элемент имеет формат обычного текста или HTML, вложение отображается с именем файла в параметре Source .

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

Объект Attachment , представляющий новое вложение.

Замечания

Когда вложение добавляется в коллекцию Attachments элемента, свойство Type объекта Attachment всегда возвращает olOLE (6) до сохранения элемента. Чтобы обеспечить согласованность результатов, всегда сохраняйте элемент перед добавлением или удалением объектов в коллекции Attachments .

Пример

В следующем примере Microsoft Visual Basic /Visual Basic для приложений (VBA) создается почтовый элемент, добавляется вложение путем его внедрения в начало текста сообщения и отображается. Чтобы запустить этот пример, убедитесь, что вложение, представляющего собой файл с именем Test.Doc, существует в C:\ Папку.

Sub AddAttachment() 
 Dim myItem As Outlook.MailItem 
 Dim myAttachments As Outlook.Attachments 
 
 Set myItem = Application.CreateItem(olMailItem) 
 Set myAttachments = myItem.Attachments 
 myAttachments.Add "C:\Test.doc", _ 
 olByValue, 1, "Test" 
 myItem.Display 
End Sub

См. также

Объект Attachments

Присоединение файла к почтовому элементу Присоединение элемента контакта Outlook к сообщению Email Ограничение размера вложения в Outlook Email Сообщение Изменение вложения сообщения Email Outlook

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

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

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