Событие MailItem.Read (Outlook)
Происходит, когда экземпляр родительского объекта открыт для редактирования пользователем.
Синтаксис
выражение. Read
Выражение Переменная, представляющая объект MailItem .
Замечания
Событие Read отличается от события Open тем, что чтение происходит каждый раз, когда пользователь выбирает элемент в представлении, поддерживающем редактирование в ячейках, а также при открытии элемента в инспекторе.
Пример
В этом примере Visual Basic для приложений (VBA) событие Read используется для увеличения счетчика, который отслеживает частоту чтения элемента.
Public WithEvents myItem As Outlook.MailItem
Sub Initialize_handler()
Set myItem = Application.ActiveExplorer.CurrentFolder.Items(1)
myItem.Display
End Sub
Sub myItem_Read()
Dim myProperty As Outlook.UserProperty
Set myProperty = myItem.UserProperties("ReadCount")
If (myProperty Is Nothing) Then
Set myProperty = myItem.UserProperties.Add("ReadCount", olNumber)
End If
myProperty.Value = myProperty.Value + 1
myItem.Save
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.