Partager via


Propriété JournalItem.DownloadState (Outlook)

Retourne une constante qui appartient à l’énumération OlDownloadState indiquant l’état de téléchargement de l’élément. En lecture seule.

Syntaxe

expression. DownloadState

Expression Variable qui représente un objet JournalItem .

Exemple

L'exemple Microsoft Visual Basic pour Applications (VBA) suivant montre comment rechercher dans la Boîte de réception de l'utilisateur des éléments qui n'ont pas encore été complètement téléchargés. Si de tels éléments qui n'ont pas été entièrement téléchargés sont trouvés, un message s'affiche et ces éléments sont marqués pour téléchargement.

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

Voir aussi

Objet JournalItem

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.