- Principe
- Exemples
- Parcours des emails via une boucle de type POUR TOUT
- Parcours des emails via une boucle de type TANTQUE
Comment lire des emails via le protocole IMAP ?
Pour lire des emails via le protocole IMAP sans passer par un logiciel de messagerie : - Récupérez les paramètres de connexion à votre serveur de messagerie. Ces paramètres sont fournis par votre fournisseur de services ou par votre administrateur réseau.
- Déclarez une variable de type emailSessionIMAP et l'initialiser avec les paramètres récupérés précédemment.
- Connectez-vous au serveur de messagerie via la fonction EmailOuvreSessionIMAP.
- Réalisez une boucle afin de lire les emails du début jusqu'à la fin en utilisant les fonctions EmailLitPremier et EmailLitSuivant. La variable Email.Endehors vaut :
- Vrai si il n'y a plus de messages à lire.
- Faux dans le cas contraire.
- Utilisez une variable de type Email pour récupérer le contenu de l'email qui a été lu.
- Fermez la session IMAP en utilisant la fonction EmailFermeSession.
Parcours des emails via une boucle de type POUR TOUT
MonMessage est un Email
MaSessionIMAP est un emailSessionIMAP
// Ouverture d'une session IMAP simple
MaSessionIMAP.AdresseServeur = "imap.masociete.fr"
MaSessionIMAP.Nom = "utilisateur"
MaSessionIMAP.MotDePasse = "secret"
// On ouvre la session IMAP
SI PAS EmailOuvreSession(MaSessionIMAP) ALORS
// Erreur d'ouverture de session IMAP
Erreur("Impossible d'ouvrir la session IMAP.", ErreurInfo())
SINON
// Lecture des messages
POUR TOUT MonMessage NON LU DE MaSessionIMAP
// On traite le message lu
Trace(MonMessage.Sujet, MonMessage.Expediteur, MonMessage.Message)
FIN
// On se déconnecte de la session
EmailFermeSession(MaSessionIMAP)
FIN
Parcours des emails via une boucle de type TANTQUE
MonMessage est un Email
MaSessionIMAP est un emailSessionIMAP
// Ouverture d'une session IMAP simple
MaSessionIMAP.AdresseServeur = "imap.masociete.fr"
MaSessionIMAP.Nom = "utilisateur"
MaSessionIMAP.MotDePasse = "secret"
// On ouvre la session IMAP
SI PAS EmailOuvreSession(MaSessionIMAP) ALORS
// Erreur d'ouverture de session IMAP
Erreur("Impossible d'ouvrir la session IMAP.", ErreurInfo())
SINON
// Lecture des messages
EmailLitPremier(MaSessionIMAP, MonMessage)
TANTQUE PAS Email.EnDehors
// On traite le message lu
Trace(MonMessage.Sujet, MonMessage.Expediteur, MonMessage.Message)
// On lit le message suivant
EmailLitSuivant(MaSessionIMAP, MonMessage)
FIN
// On se déconnecte de la session
EmailFermeSession(MaSessionIMAP)
FIN
Documentation également disponible pour…
|
|
|
|