ReportItem.MarkForDownload (Outlook)

Returns or sets an OlRemoteStatus constant that determines the status of an item once it is received by a remote user. Possible return values are olMarkedForCopy - Item is marked to be copied, olMarkedForDelete - Item is marked for deletion, olMarkedForDownload - Item is marked for download, olRemoteStatusNone - No remote status has been set, olUnMarked - Item is not marked.

This property gives remote users with less-than-ideal data-transfer capabilities increased messaging flexibility.

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