JournalItem.MarkForDownload 属性 (Outlook)
返回或 设置用于确定某个项的状态远程用户接收到后 。 读/写。
语法
expression。 MarkForDownload
表达 一个代表 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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。