Comment utiliser un serveur SMTP sécurisé avec les nouvelles commande Email ? Voici un exemple isolé de code à utiliser : gSessionSMTP est un EmailSessionSMTP gUnMail est un Email // Paramètres

Publié le par softdev

wd16



Voici un exemple isolé de code à utiliser :


gSessionSMTP est un EmailSessionSMTP
gUnMail est un Email

// Paramètres de session.

gSessionSMTP.AdresseServeur= G_MsServeurSMTP
gSessionSMTP.Nom= G_MsUser
gSessionSMTP.MotDePasse= G_MsPassword
gSessionSMTP.Port= 587
gSessionSMTP.Option= EmailOptionSécuriséTLS

// Ouverture de session.

SI PAS EmailOuvreSession ( gSessionSMTP ) ALORS
      Erreur (ErreurInfo ( errRésumé ))
      RETOUR
FIN

// Contenu de l`émail

gUnMail.Expediteur= AdrExpediteur
gUnMail.AdresseExpéditeur= ADRESSE
gUnMail.Destinataire[ 1 ]= DESTINATAIRE
gUnMail.Cc[1]= DESTCOPIE
gUnMail.Cci[1]= DESTCOPIEC
gUnMail.AccuséRéception= Faux
gUnMail.Sujet= SUJET
gUnMail.Message= CONTENU
gUnMail.HTML= ""

SI PAS EmailEnvoieMessage ( gSessionSMTP , gUnMail ) ALORS
      Erreur ( "L`envoie de l`email a échoué `" ErreurInfo ( errMessage ) "`" )
FIN


 

Source: Freedev

Publié dans Email

Pour être informé des derniers articles, inscrivez vous :
Commenter cet article