PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → URGENT / Problème envoie de mails via outlook : pièces jointes qui disparaissent ou qui sont codifiées (winmail.dat)
URGENT / Problème envoie de mails via outlook : pièces jointes qui disparaissent ou qui sont codifiées (winmail.dat)
Started by developpement, Apr., 05 2006 11:45 AM - 3 replies
Posted on April, 05 2006 - 11:45 AM
Bonjour,

Nous envoyons via windev des mails en utilisant la fonction
emailenvoiemessage de windev (MAPI), les emails envoyés via le
client oulook express arrivent correctement au destinataire par contre
pour les clients utilisant outlook 2000 et 2003 à l'envoi, les destinataires
recoivent de façon irrégulières soit des pièces jointes codifiées dans un
fichier Winmail.dat ou carément les pièces jointes sont pas visibles pour le client.

est ce que quelqu'un a déja rencontré ce problème ?

Nous avons essayé également en format 'texte brut' et cela ne fonctionne pas
dans tous les cas....


Merci !
Cordialement
Posted on April, 05 2006 - 12:51 PM
Salut,

Les fichier Winmail.dat dans un émail sont l'expression d'un paramêtre mal-configuré dans le serveur Exchange auquel se connecte le client Outlook.

Je ne sais malheuresement pas quel paramêtre est en cause.

@+, JF
Posted on April, 05 2006 - 8:36 PM
mais ce qui est étrangé c'est que les postes clients ne sont pas sur exchange, juste outlook 2000 ou 2003
Posted on April, 07 2006 - 6:48 PM
nous avons eu nous aussi ce problème, et nous avons dû renoncer. La solution qui fonctionne à merveille : ne pas utiliser Outlook. Utiliser les fonctions Windev d'envoi de mails via SMPT, en utilisant le serveur Exchange en tant que serveur SMTP. Exemple :

SI PAS EmailOuvreSessionSMTP(Id_Smtp,Adr_Serv_Smtp) ALORS
Erreur(EmailMsgErreur(Email.Erreur))
SINON
Email.NbDestinataire = 1
Email.Destinataire = adr_mail
Email.Expéditeur = wadrmail
Email.Message = message_envoi
Email.Sujet = sujet_envoi
Email.NbAttache = nb_pj
Email.Attache[1] = doc_a_joindre_1
SI PAS EmailEnvoieMessage(Id_Smtp) ALORS
Erreur(EmailMsgErreur(Email.Erreur))
SINON
Info("Message envoyé")
EmailFermeSession(Id_Smtp)
FIN
FIN

où : Id_Smtp est le nom du compte qui envoie le message
Adr_Serv_Smtp est l'adresse IP du serveur Exchange

les autre paramètres sont expliqués dans l'aide (propriétés de EmailEnvoieMessage)

Si on n'a pas de serveur Exchange, on peut faire la même chose avec le serveur du provider, mais il faut auparavant ouvrir une connexion (je ne connais plus la fonction), ce qui renvoie l'adresse IP du serveur SMTP (sauf pour Wanadoo, où il n'est pas besoin de préciser cette adresse).

Voilà, dans les deux cas de figure, ça ne pose aucun problème (environ 100 mails par jour expédiés depuis une appli Windev)