Свойство ContactItem.DownloadState (Outlook)

Возвращает константу, принадлежающую перечислению OlDownloadState , указывающую состояние загрузки элемента. Только для чтения.

Синтаксис

выражение. DownloadState

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

Пример

В следующем примере Microsoft Visual Basic для приложений (VBA) выполняется поиск элементов, которые еще не были полностью загружены в папке "Входящие" пользователя. При обнаружении еще не полностью скачанных элементов пользователю отображается сообщение, и элемент помечается для скачивания.

Sub DownloadItems() 
 
 Dim mpfInbox As Outlook.Folder 
 
 Dim objItems As Outlook.Items 
 
 Dim obj As Object 
 
 Dim i As Integer 
 
 Dim iCount As Integer 
 
 
 
 Set mpfInbox = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox) 
 
 Set objItems = mpfInbox.Items 
 
 iCount = objItems.Count 
 
 'Loop all items in the Inbox folder 
 
 For i = 1 To iCount 
 
 Set obj = objItems.Item(i) 
 
 'Verify if the state of the item is olHeaderOnly 
 
 If obj.DownloadState = olHeaderOnly Then 
 
 MsgBox "This item has not been fully downloaded." 
 
 'Mark the item to be downloaded 
 
 obj.MarkForDownload = olMarkedForDownload 
 
 obj.Save 
 
 End If 
 
 Next 
 
End Sub

См. также

Объект ContactItem

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

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