Outlook) (的 MeetingItem.DownloadState 屬性
傳回屬於 OlDownloadState 列舉的常數,指出專案的下載狀態。 唯讀。
語法
expression。 DownloadState
表達 代表 MeetingItem 物件的 變數。
範例
下列 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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。