AIDE Envoie un mail automatiquement

Bonsoir les FEKWX, avec votre soutien sur divers problème qui me poussent à accroître mon sens de développement. Je viens encore près de vous poser une préoccupation qui certainement a déjà été résolu. c'est celui d'envoyer un mail automatiquement à un utilisateur, une fois celui-ci s'est enregistré.
J'ai utilisé les bouts de code laissés en exemple par PCSOFT mais ça me renvoie une erreur.
NB : cet envoie doit pouvoir se faire via une application WD,WM,WB la version utilisée est WX22_73h.
Merci pour votre aide, elle me sera salutaire et me permettra d'avancer.
[code = windev]SI EmailOuvreSession(USER, PASSWORD, "pop3.gmail.com", ...
"smtp.gmail.com") = Vrai ALORS
NomUser = USER
SINON
NomUser = ""
Erreur("Impossible d'établir la connexion")
FIN

// Initialise les composantes du mail
// L'expéditeur
Email.Expéditeur = "<user@pcsoft.fr>"
// Le destinataire
Email.Destinataire[1] = DESTINATAIRE
// Le nombre de destinataires
Email.NbDestinataire = 1
// Le sujet
Email.Sujet = SUJET
// Le corps du message
Email.Message = TEXTE
// Le nombre de pièces attachées
Email.NbAttache = 0

// Envoie le mail
SI EmailEnvoieMessage(NomUser) = Faux ALORS
Erreur()
FIN[/code]

 

Code (Text):

// Envoi d'email via un serveur SMTP Sécurisé

// Session SMTP Sécurisée
gSessionSMTP est une EmailSessionSMTP
gSessionSMTP..AdresseServeur = "smtp.gmail.com"
gSessionSMTP..Nom = gsUser
gSessionSMTP..MotDePasse = gsPassword
gSessionSMTP..Port = 587
gSessionSMTP..Option = emailOptionSécuriséTLS

// Contenu de l'email  
UnCourriel est un Email
UnCourriel..AdresseExpéditeur = gsUser
UnCourriel..Destinataire[1] = "pcsoft@pcsoft.fr"
UnCourriel..Sujet = "Envoi d'un email depuis windev."
UnCourriel..Message = "Envoi d'un message email depuis windev."

// Envoi de l'email
SI EmailOuvreSession(gSessionSMTP) = Vrai ALORS
SI EmailEnvoieMessage(gSessionSMTP, UnCourriel) = Faux ALORS
    Erreur("L'envoi de l'email a échoué.", ErreurInfo(errMessage))
FIN
SINON
Erreur("Impossible d'établir la connexion", ErreurInfo(errMessage))
FIN
 

////////////////////////////////////////////
Même en utilisant ce code je n'obtiens rien sauf une erreur

 

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

c'est pas un problème de securité google.. du type autorisé application non sécurisé ?

Cliquez pour agrandir...