Свойство AppointmentItem. Довнлоадстате (Outlook)AppointmentItem.DownloadState property (Outlook)

Возвращает константу, принадлежащую перечислению OlDownloadState , указывающее состояние скачивания элемента.Returns a constant that belongs to the OlDownloadState enumeration indicating the download state of the item. Только для чтения.Read-only.

СинтаксисSyntax

выражение.expression. DownloadState

Expression (выражение ) Переменная, представляющая объект AppointmentItem .expression A variable that represents an AppointmentItem object.

ПримерExample

Следующий пример Microsoft Visual Basic для приложений (VBA) выполняет поиск элементов, которые еще не были полностью скачаны, в папке "Входящие" пользователя.The following Microsoft Visual Basic for Applications (VBA) example searches through the user's Inbox for items that have not yet been fully downloaded. Если найдены все еще не полностью загруженные элементы, пользователю выводится сообщение о том, что элемент помечен для загрузки.If any not yet fully downloaded items are found, a message is displayed to the user, and the item is marked for download.

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

См. такжеSee also

Объект AppointmentItemAppointmentItem Object

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

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.