Событие TaskRequestDeclineItem.AttachmentRead (Outlook)
Происходит, когда вложение в экземпляре родительского объекта открыто для чтения.
Синтаксис
выражение. AttachmentRead
( _Attachment_
)
Выражение Переменная, представляющая объект TaskRequestDeclineItem .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Attachment | Обязательный | Вложения | Вложение, которое было открыто. |
Пример
В этом примере Visual Basic для приложений (VBA) отображается сообщение, когда пользователь пытается прочитать вложение. Пример кода должен быть помещен в модуль класса, например ThisOutlookSession
, и процедура должна быть вызвана TestAttachRead()
, прежде чем процедура события может быть вызвана Microsoft Outlook. Для выполнения этого примера в папке "Входящие" должен быть хотя бы один элемент с темой "Тест" и содержащий по крайней мере одно вложение.
Public WithEvents myItem As outlook.MailItem
Private Sub myItem_AttachmentRead(ByVal myAttachment As Outlook.Attachment)
If myAttachment.Type = olByValue Then
MsgBox "If you change this file, also save your changes to the original file."
End If
End Sub
Public Sub TestAttachRead()
Dim atts As Outlook.Attachments
Dim myAttachment As Outlook.Attachment
Set myItem = Application.ActiveExplorer.CurrentFolder.Items("Test")
Set atts = myItem.Attachments
myItem.Display
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.