Je ne vois pas où tu ne prends que les fichiers sélectionnés dans ta listbox.
Code :
- For i = 0 To ListBox1.Items.Count - 1
- lavaleur = ""
- lavaleur = CStr(ListBox1.Items(i))
|
Là tu prends tous les fichiers... Donc si tu as 6 fichiers dans ta listbox, il envoie 6 mails, logique.
Il faut donc tester quelle ligne est sélectionnée dans ta listbox
Un truc dans le genre pourrait le faire :
Code :
- For i = 0 To ListBox1.Items.Count - 1
- If listBox1.selected(i) = true then
- lavaleur = ""
- lavaleur = CStr(ListBox1.Items(i))
- 'Le reste de ton code
-
- End if
|
Quant au fait que personne ne "t'aide", bah tu ne donnes que tres peu d'info. Notamment combien d'entrees dans ta liste (six ?) etc.
Message édité par SuppotDeSaTante le 22-03-2011 à 09:47:20
---------------
Soyez malin, louez entre voisins !