Connaître le nombre de mails d'un dossier

**Delphi-ne** · 19/01/2017, 22h02

Bonjour,

je suis en train d'écrire un traitement sur la boîte de mails

Le code est le suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
		EmailChangeDossier(LN_OutlookID, LT_Liste[i])
		EmailLitPremier(LN_OutlookID)
		TANTQUE Email.EnDehors = Faux
			EmailLitSuivant(LN_OutlookID)
		FIN

Cela fonctionne mais je voudrais ajouter une jauge.
Pour cela j'ai besoin de connaître dès le début le nombre de mails à traiter.
Je ne trouve pas de fonction qui permette cela

Merci si vous pouvez m'aider

**jurassic pork** · 20/01/2017, 08h46

hello,
il y a la fonction EmailNbMessage sinon en utilisant l'objet COM outlook.application :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
[mapiNS est un objet Automation dynamique
mapiRep est un objet Automation dynamique
monOutlook est un objet Automation "Outlook.Application"
mapiNS = monOutlook>>GetNamespace("MAPI")
// olFolderInbox = 6    boîte de réception
mapiRep = mapiNS>>GetDefaultFolder(6)
Trace("Nb messages dans la boîte de reception du dossier par défaut :  ",mapiRep>>Items>>Count)
// nb de messages dans le dossier MonDossier/Boîte de réception 
mapiRep = mapiNS>>Folders("MonDossier")>>Folders("Boîte de réception")
Trace("Nb messages dans la boîte de reception  de MonDossier  :  ",mapiRep>>Items>>Count)

Ami calmant, J.P

**Delphi-ne** · 20/01/2017, 09h54

Merci beaucoup.

J'avais vu cela quand j'ai commencé mais on se trouve avec de l'OLE donc sur une autre technologie.
Ca me gêne de mélanger.
C'est quand même bizarre qu'il n'y ait pas de fonction de comptage avec les fonctions Email.
Ce sera peut-être la 923 amélioration de la version 23 ou la 924 de la version 24...