|
|
|
|
|
|
|
|
|
|
- Lecture des emails reçus par l'intermédiaire de MS Exchange
Lecture des emails reçus par l'intermédiaire de MS Exchange Le code suivant utilise MS Exchange pour lire les nouveaux emails reçus. Après l'ouverture de la session d'email, la boîte de réception de MS Exchange est mise à jour : les emails présents sur le serveur sont transférés dans MS Exchange. Un profil "PROFIL_Exemple" a été créé sous MS Exchange. Pour plus de détails sur la création des profils, consultez la fonction EmailOuvreSession. IDEmail est un entier
// Ouverture de la session d'email
IDEmail = EmailOuvreSession("PROFIL_Exemple")
// Récupération des messages dans la boîte de réception de MS Exchange
EmailMiseAJour(IDEmail)
// Parcours des nouveaux messages reçus depuis le premier jusqu'au dernier
EmailLitPremier(IDEmail, "NON LUS")
TANTQUE Email.EnDehors = Faux
SI OuiNon("Vous avez reçu un email de " + Email.Expéditeur + ...
"Voulez-vous le lire ?") ALORS
// Ouverture de la fenêtre de lecture des messages
Ouvre(FEN_Email_RCV)
SINON
EmailLitSuivant(IDEmail, "NON LUS")
FIN
FIN
...
EmailFermeSession(IDEmail)
Documentation également disponible pour…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|