Hello,

Et ensuite? comment ajoute tu la pj au mail ?
Voici un code que j'utilise pour passer plusieurs pièces jointes a un mail depuis un tableau de chaines (contenant le chemin des fichiers à joindre.

Si tu trace pas a pas dans le debugger, que vaut sFichier a la ligne :
monAttache..Nom = fExtraitChemin(sFichier, fFichier + fExtension)

// Ici MonMail est une variable de type Email
SI TableauInfo(ListePj,tiNombreTotal)>0 ALORS
PieceJointe est un emailAttache
POUR i=1 _À_ TableauInfo(ListePj,tiNombreTotal)
sCheminFichier est une chaîne
sNomFichier est une chaîne
sCheminFichier = ListePj[i]
sNomFichier = fExtraitChemin(ListePj[i], fFichier + fExtension)

PieceJointe.Nom = sNomFichier
PieceJointe.Contenu=fChargeTexte(sCheminFichier)
PieceJointe.ContentType="application/unknown"

Ajoute(MonMail..Attache,PieceJointe)
FIN
FIN

bonjour ,
quand j’envoie un email en mettant une pièce jointe l'expéditeur reçois le fichier joint sous format binaire.
voici le code.
// Ajoute la pièce jointe si besoin

monAttache est un emailAttache
sFichier est une chaîne =SAI_Fichier

// Construction de la variable emailAttache
monAttache..Nom = fExtraitChemin(sFichier, fFichier + fExtension)
monAttache..Contenu = fChargeBuffer(sFichier)


voici la pièce jointe reçus.