PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → EmailOuvreSessionSMTP
EmailOuvreSessionSMTP
Débuté par FRANCIS, 18 mai 2018 08:56 - 3 réponses
Membre enregistré
146 messages
Posté le 18 mai 2018 - 08:56
Bonjour,
J'ai un soucis depuis une semaine mon code ne fonctionne plus :
// Preparation du mail ------------------------------------------------
EmailChangeTimeOut(10) // 10 secondes pour le time out

SI EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",587,emailOptionSécuriséTLS) = Vrai ALORS
Info("c'est tout bon")
SINON
Erreur("Impossible d'établir la connexion sur le serveur SMTP ")
FIN
// fin preparation du mail --------------------------------------------


J'ai un message d'erreur :





Qui m'indique que mon spooler de mail n'est pas actif ? pourtant je suis bien sur WINDEV pas WEBDEV.
Avez vous une idée du pourquoi cela ne fonctionne plus
MERCI
Posté le 18 mai 2018 - 16:54
bonjour

syntaxe emailouvresessionsmtp :
<Résultat> = EmailOuvreSessionSMTP(<Nom utilisateur> [, <Mot de passe>] , <Adresse serveur SMTP> [, <Numéro port SMTP> [, <Mode Asynchrone> [, <Option>]]])

donc ajouter le paramétre faux pour <Mode Asynchrone>

de plus le port est bien 587 avec emailOptionSécuriséTLS pour le smtp office :
attention dans l'image jointe à votre message il y a le port 25

essayer donc avec :
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",587,faux,emailOptionSécuriséTLS)

bon devs
Membre enregistré
146 messages
Posté le 18 mai 2018 - 17:06
Bonjour,
Merci digi12 mais j'ai deja essayé toutes les saisies.

J'ai essayé
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",587,faux,emailOptionSécuriséTLS)
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",587,vrai,emailOptionSécuriséTLS)
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",25,faux,emailOptionSécuriséTLS)
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",25,vrai,emailOptionSécuriséTLS)
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com")
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com")
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",587,emailOptionSécuriséTLS)
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",25,emailOptionSécuriséTLS)
....

Ce que je ne comprends pas c'est que cette ligne fonctionnait il y a une semaine :
EmailOuvreSessionSMTP(User,Password,"smtp.office365.com",587,emailOptionSécuriséTLS)

Aujourd'hui, j'ai un message du spooler mail, qui normalement ne dois pas apparaitre dans WINDEV

;(
Posté le 22 mai 2018 - 16:59
Bonjour,

Pour ma part, ce code fonctionne (encore aujourd'hui) :

// Ouverture de la session SMTP Office365
EmailChangeTimeOut(20) // Modification du timeout (recommandé)
SI EmailOuvreSessionSMTP(sAdresseExpediteur, sMotdePasse,sServeurSMTP,nPort,emailSynchrone ,emailOptionSécuriséTLS) = Vrai ALORS

.....
FIN

PS= le port est fixé à 587