PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → Envoi d'email impossible
Envoi d'email impossible
Iniciado por Gérard, set., 15 2020 11:17 AM - 5 respostas
Publicado em setembro, 15 2020 - 11:17 AM
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
Membro registado
70 mensagems
Popularité : +8 (8 votes)
Publicado em setembro, 15 2020 - 3:43 PM
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 ?
Publicado em setembro, 15 2020 - 4:24 PM
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 !
Publicado em setembro, 16 2020 - 9:56 AM
"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
Publicado em outubro, 21 2020 - 3:21 PM
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
Membro registado
81 mensagems
Popularité : +2 (4 votes)
Publicado em outubro, 23 2020 - 12:57 PM
essayez peut etre avec l'option

emailOptionSécuriséTLS

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