PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → 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)
Iniciado por developpement, 05,abr. 2006 11:45 - 3 respuestas
Publicado el 05,abril 2006 - 11:45
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
Publicado el 05,abril 2006 - 12:51
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
Publicado el 05,abril 2006 - 20:36
mais ce qui est étrangé c'est que les postes clients ne sont pas sur exchange, juste outlook 2000 ou 2003
Publicado el 07,abril 2006 - 18:48
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)