Désolé encore moi. PB envoi mail avec pièce jointe

TEV · dummy mioche Inscrit le: 26 Oct 2003 Messages: 8

Bonjour,

Je cherche à envoyer un mail via le contrôle Winsock
Tout semble fonctionner, mais voici les différents soucis rencontrés :

Lorque je reçoit ce mail avec Outlook, j'ai un message nickel mais le fichier joint contient le codage base64 du fichier lui même au lieu des données figurantes.

Lorsque je reçoit ce mail sur une boîte mail type Caramail le message contient les entêtes MIME et les caractères du fichier encodé en base64 comme faisant partit du message.

Quelqu'un sait-il ce qui se passe ? Je suis dessus depuis trois jour. Par avance merci pour toutes les réponses.

Christian.
P.S. Je joins le code d'envoi des commandes SMTP à partir du DATA
en VB6. Plus haut dans le code j'ai Helo -> Mail From -> Rcpt to.

sDataToSend = "DATA" & vbCrLf
Winsock2.SendData sDataToSend

Case SMTP_DATA

' Change l'état de la session
CurrentSMTPSessionState = SMTP_SENDMESSAGE

' Envoie les en-têtes du message
Winsock2.SendData "From: " & Chr(34) & "Stephenson & Chr(34) & "<" & AdMail & ">" & vbCrLf
' Indique à qui est adressé le message
Winsock2.SendData "To: " & toNomMail & vbCrLf
' L'objet du message
Winsock2.SendData "Subject: " & objMsg & vbCrLf
' Définit le mail comme comportant plusieurs objets
Winsock2.SendData "MIME-Version 1.0" & vbCrLf Winsock2.SendData "Content-Type:multipart/mixed; "
Winsock2.SendData "boundary=" & Chr(34) & "NextPart" & Chr(34) & vbCrLf & vbCrLf

' Partie texte plein
Winsock2.SendData "--NextPart" & vbCrLf
Winsock2.SendData "Content-Type:text/plain; charset=" & Chr(34) & "ISO-8859-1" & Chr(34) & vbCrLf
Winsock2.SendData "Content-Transfert-Encoding: 8bit" & vbCrLf & vbCrLf

' le corps du message
sDataToSend = corpsMsg
Winsock2.SendData sDataToSend & vbCrLf
' définition et envoi du fichier joint
Winsock2.SendData "--NextPart" & vbCrLf
Winsock2.SendData "Content-Type:application/octet-stream;name=" & Chr(34) & "MajBD.zip" & Chr(34) & vbCrLf
Winsock2.SendData "Content-Transfert-Encoding:base64" & vbCrLf
Winsock2.SendData "Content-disposition:attachment;filename=" & Chr(34) & "MjBD.txt" & Chr(34) & vbCrLf & vbCrLf

' Envoi le fichier zip codé en base64
sDataToSend = decoupeFichier
Winsock2.SendData sDataToSend & vbCrLf & vbCrLf
' Ferme les corps multiples
Winsock2.SendData "--NextPart--" & vbCrLf

' Envoie un point pour indiquer la fin de l'envoie des données
Winsock2.SendData vbCrLf & "." & vbCrLf

Salemioche · Posté le: Mar Nov 04, 2003 12:27 pm Sujet du message:

c'est un peu dur a voir, pouvez mettre le texte afficher par caramail

a voir egalement :
http://www.salemioche.com/mime/mime_descr.php
et
http://www.salemioche.com/smtp/smtp_prog2.php
_________________
Creer son site - Hebergement - Jumeaux

TEV · dummy mioche Inscrit le: 26 Oct 2003 Messages: 8

Merci pour la réponse.

Voici le contenu du mail reçu sur la boîte Caramail. Tous ce qui suit est visible dans le corps du message :

MIME-Version 1.0
Content-Type:multipart/mixed;boundary="NextPart"

Ceci est un envoi MIME

--NextPart
Content-Type:text/plain;charset="ISO-8859-1"
Content-Transfert-Encoding:base64

Message blablablabla...

--NextPart
Content-Type:application/octet-stream;name="MajBD.zip"
Content-Transfert-Encoding:base64
Content-Disposition:attachment;filename="MjBD.txt"

*/ Fichier encodé 1er ligne et dernière ligne/*
QHhZLSNNQUogZHUgMjYvMTAvMjAwM0ANCjM7MTYvMDQvMjAwMTsyNi8w
7MjswMS8wMS8yMDAzDQo==

--NextPart--

J'éspère que vous arriverez à me dire ce qui se passe.
Christian.

Salemioche · Posté le: Mar Nov 04, 2003 4:01 pm Sujet du message:

verifier qu'il n'y pas de ligne vierge entre le subject:
et le MIME 1.0
_________________
Creer son site - Hebergement - Jumeaux

TEV · dummy mioche Inscrit le: 26 Oct 2003 Messages: 8

Il n'y avait pas d'espace entre le sujet et l'entête MIME. Par contre après avoir relu pour la 150e fois mon code d'envoi, j'ai vu que MIME ne possédait pas de ":" entre version et 1.0 et j'avais écris Transfer avec un "t" à la fin. Trois jours plein de recherche pour seulement ça. Je suis partis plutôt sur la fonction d'encodage et sur l'agencement des envois de commandes SMTP et la syntaxe, que sur l'orthographe.

Enfin, merci beaucoup de vous êtes occupé de mon cas.

Christian.