Outlook) (DistListItem.DownloadState 屬性

傳回屬於 OlDownloadState 列舉的常數，指出專案的下載狀態。 唯讀。

語法

expression。 DownloadState

表達 代表 DistListItem 物件的 變數。

範例

下列 Microsoft Visual Basic for Applications (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

另請參閱

DistListItem 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。