PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → Lorsque j'envoi un mail par programmation en windev et que mon titre contient des accents, il ne s'affiche par correctement sur certaines machines (notamment les MACs)
Lorsque j'envoi un mail par programmation en windev et que mon titre contient des accents, il ne s'affiche par correctement sur certaines machines (notamment les MACs)
Started by Baptiste, Jul., 15 2024 4:32 PM - 5 replies
Posted on July, 15 2024 - 4:32 PM
Bonjour,

Lorsque j'envoi un mail par programmation en windev et que mon titre contient des accents, il ne s'affiche par correctement sur certaines machines (notamment les MACs)

Email.Recipient = ...

Email.Sender = ...
Email.Message = sTXTMAIL
Email.Subject="Texte avec des accents : éé àà"


Email.NbRecipient = 1
Email.NbCc=0
Email.NbCci=0

EmailSendMessage(NomUser)

'ai essayé de convertir mon texte en utf8, d'utiliser emailOptionEncodeEntête. Rien ne fonctionne

Avez vous une idée SVP ?
Registered member
2,646 messages
Popularité : +222 (260 votes)
Posted on July, 16 2024 - 8:20 AM
Bonjour,

Essaye de convertir ton mail en HTML

--
Cordialement,

Philippe SAINT-BERTIN
Registered member
2,004 messages
Popularité : +53 (65 votes)
Posted on July, 16 2024 - 8:37 AM
Bonjour Baptiste,

Sauf erreur de ma part, ce problème a déjà été évoqué maintes fois dans ce forum.
Une recherche devrait t'apporter des réponses.

Il me semble qu'il faut utiliser l'Unicode....

--
Bon dev,
Jean-Pierre
Posted on July, 16 2024 - 10:01 AM
Bonjour

Je remonte le sujet pour vous dire que j'ai ce message
"Impossible de se connecter au serveur SMTP. "
"Session SMTP, accès refusé"

mon code est comme suit
MaSession est une emailSessionSMTP
MaSession.Nom = "AAAAA@gmail.com"
MaSession.MotDePasse = "PASSE" //Passe de mon mail "AAAAA@gmail.com"
MaSession.AdresseServeur = "smtp.gmail.com"
MaSession.Port = 587
MaSession.Option = emailProtocoleSMTPS

EmailChangeTimeOut(10)

SI PAS EmailOuvreSession(MaSession) ALORS
Erreur("Impossible de se connecter au serveur SMTP.",ErreurInfo()) //ICI ce message cité en haut
RETOUR
FIN

MonMessage est un Email
MonMessage..Expediteur = "AAAAA@gmail.com"
MonMessage..Sujet = "SAI_Sujet"
MonMessage..HTML = "SAI_CorpsEmail"
MonMessage..Message = HTMLVersTexte("SAI_CorpsEmail")

Ajoute(MonMessage.Destinataire,"BBBBB@gmail.com")

SI EmailEnvoieMessage(MaSession, MonMessage) = Faux ALORS
Erreur("Message non envoyé.", ErreurInfo())
SINON
ToastAffiche("Message envoyé", toastCourt,cvMilieu, chCentre)
FIN
EmailFermeSession(MaSession)



Je ne connais pas la source de ce MESSAGE

Merci de me donner une idée
Registered member
81 messages
Popularité : +2 (2 votes)
Posted on July, 16 2024 - 10:01 AM
Bonjour,

dixit l'aide de Windev :

AdresseExpéditeur Chaîne de caractères Adresse à laquelle la réponse au message doit être envoyée (127 caractères maximum). Correspond au Reply-To. Pour plus de détails, consultez Correspondance entre les propriétés et la norme RFC.
Remarque : Si l'adresse contient des caractères spéciaux, des accents, utilisez la constante emailOptionEncodeEntête lors de l'envoi du message avec la fonction EmailEnvoieMessage.


donc utilise : EmailEnvoieMessage(MaSession, cMonEmail, emailOptionEncodeEntête)

Eric
Posted on July, 16 2024 - 2:52 PM
J'ai teste en HTML, ca ne corrige pas le problème
J'avais également testé avec emailOptionEncodeEntête et cela inverse le problème
Les messageries qui n'avaient pas le problème ont le problème et celles qui avaient le problème ne l'ont plus