|
| OLE outlook parcourir mail |
| Iniciado por fabio.thuel, 18,oct. 2019 11:17 - No hay respuesta |
| |
| | | |
|
| |
| Publicado el 18,octubre 2019 - 11:17 |
Bonjour,
Je cherche a parcourir la liste de tout les mails reçu, hors les informations que je trouve permette de lire celui sélectionner.
autMonOutlook est un objet OLE "Outlook.Application"
i est un entier
MailItem est un objet automation dynamique
POUR i = 1 _À_ autMonOutlook>>ActiveExplorer>>Selection>>Count
MailItem = autMonOutlook>>ActiveExplorer>>Selection(i)
ConsoleEcrit(MailItem>>SenderName + " > " + MailItem>>Subject)
nNbPJ est un entier = MailItem>>Attachments>>Count
ConsoleEcrit(RC + nNbPJ + " fichiers attachés")
POUR i = 1 À nNbPJ
ConsoleEcrit(RC + TAB + "N°" + i + " -> " + MailItem>>Attachments>>Item[i]>>FileName)
FIN
ConsoleEcrit(RC + "-----------------------------------------")
FIN
ConsoleEcrit(RC + RC + RC + RC + RC + "Appuyer sur une touche pour continuer... ")
ConsoleLit()
Voila mon code, si quelqu'un peux me venir en aide, merci d'avance  |
| |
| |
| | | |
|
| | | | |
| | |
|