PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2025 → Envoi d'email impossible
Envoi d'email impossible
Débuté par gerard.bouchard, 15 sep. 2020 11:17 - 5 réponses
Posté le 15 septembre 2020 - 11:17
Bonjour,

Je ne parviens pas à envoyer de mail avec une adresse chez mail.infomaniak.com. J'ai essayé tout un tas de choses mais sans succès.

Auriez-vous la gentillesse s'il vous plait de me donner le bout de code que vous utilisez dans votre application pour ouvrir la session ?

Cordialement,

GB
Membre enregistré
70 messages
Posté le 15 septembre 2020 - 15:43
Salut,
La documentation est déjà très complète : https://doc.pcsoft.fr/fr-FR/?3032025&name=emailouvresessionsmtp_fonction
A quel moment as-tu un soucis ?
Posté le 15 septembre 2020 - 16:24
Bonjour Laurent,

Comme je n'arrive pas à identifier si le souci vient de mon code, je serais du coup intéressé de savoir quel code windev avec ce fournisseur fonctionne ?

J'ai essayé tout un tas d'exemples mais n'y arrive pas : EmailOuvreSession() est Faux.

Merci !
Posté le 16 septembre 2020 - 09:56
"Gérard" a exposé le 15/09/2020 :
Bonjour Laurent,

Comme je n'arrive pas à identifier si le souci vient de mon code, je serais
du coup intéressé de savoir quel code windev avec ce fournisseur fonctionne ?

J'ai essayé tout un tas d'exemples mais n'y arrive pas : EmailOuvreSession()
est Faux.

Merci !


bonjour,

est ce que votre code ressemble à celà ?

MaSession est une emailSessionPOP3 // emailSessionIMAP si IMAP ou
emailSessionSMTP si SMTP
bOK est booléen

MaSession..AdresseServeur = "mail.infomaniak.com"
MaSession..Nom = "utilisateur@infomaniak.com"
MaSession..MotDePasse = "secret"
MaSession..Port = 995 // 993 si IMAP ou 465 si SMTP
MaSession..Option = optionSSL

bOK = EmailOuvreSession(MaSession)
SI PAS bOK ALORS Erreur(ErreurInfo());RETOUR
// ouverture réussi

--
Cordialement JeAn-PhI
Posté le 21 octobre 2020 - 15:21
Bonjour,

J'ai le même soucis, impossible d'envoyer un mail avec le code ci-dessous


////////////////// mail ///////////////////
Email.Destinataire=lmail
Email.NbDestinataire=1
Email.Expéditeur=sUser
Email.Sujet="Document de Vente"
Email.Message="Bonjour,"+rc+" Ci-joint le document de vente,"+rc+"Bonne journée"
///////////////////////////////////////
Info("parametres de connexion :"+sUser+" "+sPasse+" "+sErveur+" "+xPort)

EmailChangeTimeOut(10)
SI EmailOuvreSessionSMTP(sUser,sPasse,sErveur,xPort)=Vrai ALORS
Info("parametres de connexion :"+sUser+" "+sPasse+" "+sErveur+" "+xPort)
SINON
Info("connexion impossible!!"+ErreurInfo())

FIN

SI EmailEnvoieMessage(sUser,EmailOptionRéférence)=Faux ALORS
Erreur("Mail nonenvoyé")
FIN

EmailFermeSession(sUser)

////////////////////////////////////////////////
le message au bout d'un certain temps est que le serveur ne réponds pas
j'ai rajouter dans le parefeu de windows le port sortant (587)
(je teste de chez moi avant de le mettre dans mon aplication )
si je change pas le timeout ça plante l'aplication bien évidemment
si je mets plus longtemps c'est pareil
si quelqu'un à la solution
Merci!!!Véro
Membre enregistré
81 messages
Posté le 23 octobre 2020 - 12:57
essayez peut etre avec l'option

emailOptionSécuriséTLS

SI PAS EmailOuvreSessionSMTP(cLoginSMTP,cMdpSMTP,cServeurSMTP,nPortSMTP,Faux,emailOptionSécuriséTLS) ALORS
RETOUR
FIN