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


Событие 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

См. также

Объект MailItem

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

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