constant that determines the status of an item once it is received by a remote user. This property gives remote users with less-than-ideal data-transfer capabilities increased messaging flexibility. Read/write.
OlRemoteStatus can be one of these OlRemoteStatus constants. |
olMarkedForCopy The item will be copied to the remote site. |
olMarkedForDelete The item will be deleted. |
olMarkedForDownload The item will be downloaded in its entirety. |
olRemoteStatusNone The item has no remote status. |
olUnMarked The item isn't marked for remote status and will be disregarded. |
expression.MarkForDownload
expression Required. An expression that returns one of the objects in the Applies To list.
Example
The following example searches through the user's Inbox for items that have not yet been fully downloaded. If any items are found that are not fully downloaded, a message is displayed and the item is marked for download.
Sub DownloadItems()
Dim outApp As Outlook.Application
Dim mpfInbox As Outlook.MAPIFolder
Dim obj As Object
Dim i As Integer
Set outApp = CreateObject("Outlook.Application")
Set mpfInbox = outApp.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