JournalItem.MarkForDownload 属性 (Outlook)

返回或 设置用于确定某个项的状态远程用户接收到后 。 读/写。

语法

expressionMarkForDownload

表达 一个代表 JournalItem 对象的变量。

备注

利用此属性,数据传输能力较弱的远程用户可以更加灵活地进行邮件收发。

示例

本示例在用户的 "收件箱" 中搜索尚未全部下载的项目。 如果找到此类项目,将向用户显示一条消息,并将该项目标记为下载。

Sub DownloadItems() 
 
 Dim mpfInbox As Outlook.Folder 
 
 Dim obj As Object 
 
 Dim i As Integer 
 
 
 
 Set mpfInbox = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox) 
 
 'Loop all items in the Inbox folder 
 
 For i = 1 To mpfInbox.Items.Count 
 
 Set obj = mpfInbox.Items.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 
 
 End If 
 
 Next 
 
End Sub

另请参阅

JournalItem 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。