FORUM WINDEV

Bonjour, dans la série envoie email sur Windev 10,
je n'arrive pas à ouvrir une session avec
EmailOuvreSessionSMTP.
Quelqu'un à une idée?
Merci


PS: mon code SI EmailOuvreSessionSMTP("nom_user", "adresse IP") = Vrai ALORS

// Procédure permettant d'initialiser la structure e-mail
Initialise_Email()

SI EmailEnvoieMessage(nomuser) = Faux ALORS
Erreur(EmailMsgErreur(Email.Erreur))
FIN
SINON
Erreur("Impossible d'établir la connexion"+RC+ ...
EmailMsgErreur(Email.Erreur))
FIN

Salut,

Essaie ceci:

Code: Tout sélectionner


// Envoi d'un e-mail par le protocole SMTP
SI EmailOuvreSessionSMTP(NomUser, "smtp.ifrance.fr") = Vrai ALORS
   // Procédure permettant d'initialiser la structure e-mail
   Initialise_Email()
   // Envoie l'e-mail
   SI EmailEnvoieMessage(NomUser) = Faux ALORS
      Erreur(EmailMsgErreur(Email.Erreur))
   FIN
SINON
   Erreur("Impossible d'établir la connexion"+RC+ ...
                     EmailMsgErreur(Email.Erreur))
FIN