Discussion :

[buzz68180]

Bonjour,

Je me sert de l'exemple WD Outlook pour récuperer les messages des clients de ma BDD , puis je souhaiterais les enregistrer au format .msg. Y'a t-il une fonction Windev pour effectuer cette sauvegarde ou faut il le faire en VBA ?

Merci pour votre aide

[buzz68180]

Debut de code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
 
MonOutlook est un objet OLE "OutLook.Application"
objItem est un objet OLE dynamique
 
POUR i = 1 A TableSelectOccurrence(TABLE_Mails)
	sItem est une chaîne=TABLE_Mails.COL_ID[i]
 
 
FIN
// Re-positionnemment sur l'objet OutLook correspondant
 
objItem=MonOutlook>>GetItemFromID(sItem)
 
// Ensuite ?????