Gestion fichiers joints

[delavega]

Bonjour,

Quelqu'un pourrait il m'expliquer comment envoyer plusieurs fichiers joints dans un mail svp ?

Actuellement, j'utilise ce morceau de code, qui fonctionne pas

merci d'avance pour votre aide :

'
for i=0 to session("item")-1
contenu = contenu & "Titre : " & prod.fields("id_titre") & " Ref. : " & prod.fields("id_ref") & " Prix : " & prod.fields("id_prix") & vbCrLf
compta = compta + prod.fields("id_prix")
fiche = fiche + prod.fields("id_fichier") & ";"
prod.movenext
next
'
' Attached File
' *******
session("fiche") = fiche
Response.write "fiche = " & session("fiche")
mySmartMail.Attachments.Add Server.MapPath("./admin/data/" & session("fiche"))

Merci

[boss_gama]

quel composant utilises tu?

[delavega]

Il s'agit de :

aspSmartMail

merci

[boss_gama]

a priori il suffit de repeter la ligne:

Code :

mySmartMail.Attachments.Add

autant de fois que tu as de pièces jointes.
Qu'est-ce qui ne marche pas?

[delavega]

Le problème c'est que le nombre et le nom des fichiers joints se trouve dans la boucle :

'
for i=0 to session("item")-1
contenu = contenu & "Titre : " & prod.fields("id_titre") & " Ref. : " & prod.fields("id_ref") & " Prix : " & prod.fields("id_prix") & vbCrLf
compta = compta + prod.fields("id_prix")
fiche = fiche + prod.fields("id_fichier") & ";"
prod.movenext
next
'

Alors comment rajouter le nombre de ligne pour ajouter un fichier joint au mail avec le bon nom en prenant compte de cette boucle ?

Merci

[boss_gama]

je vois pas bien ce que ta boucle est censée faire, mais rien ne t'empeche de faire quelque chose du style:

Code :

1
2
3
4
5
for i=0 to session("item")-1
fiche = fiche + prod.fields("id_fichier") & ";"
mySmartMail.Attachments.Add Server.MapPath("./admin/data/" & fiche
prod.movenext
next

Ca te convient?

[delavega]

Oui, tout à fait, j'ai réussi à faire fonctionner mon code grace à tes indications, encore merci.

[boss_gama]

pas de souci!

un petit résolu alors