nom=rs_client(0)
prenom=rs_client(1)
mail_confirm.Subject = "Votre commande chez -----"
mail_confirm.Body = "Chèr(e) " & nom & " " & prenom & "," & vbNewLine _
& vbNewline _
& "Nous vous remercions d'avoir passé commande auprès des Editions Jurys Africa. " & vbNewLine _
& "Nous sommes heureux de vous annoncer que votre commande a été validé et qu'elle sera expediée dans les plus brefs délais." & vbNewLine _
& "Nous vous rappellons que vous avez souscrit à " & rs_verif(0) & " abonnement(s)." & vbNewline _
do while not rs_client.eof
mail_confirm.Body=mail_confirm.Body & " " & rs_client(3) & " ("& rs_client(4)&" )" & vbNewline _
rs_client.movenext
loop |
Bon, voila, je n'arrive pas a concaténer la chaine "mail_confirm.Body". ca doit merder ds la boucle, mais je vois pas ou
Message édité par fabd le 22-07-2003 à 12:05:13