Copier les fichiers affichés dans un listbox

Version imprimable

Bonjour,
j'ai créer une procédure qui scanne des types de fichiers ( Audio, Vidéo, Images, Documents ) dans tous les répertoires du PC et affiche tous les fichiers trouvés dans une listbox, je voudrais copier les fichiers trouvés dans le répertoire du programme, j'ai modifié le code issu de la réponse de gunteman
Code:

1 2 3 4 5 6 7 8 Private Sub CopyDesFichiers() Dim file As FileInfo For Each fileitem In ListboxFichiersTrouvés.Items file = New FileInfo(fileitem.Value) file.CopyTo(Path.Combine(Application.StartupPath, file.Name), True) Next End Sub
http://nsa31.casimages.com/img/2012/...0641171706.jpg

12/11/2012, 10h45
supermouton

Bonjour,

Tu es en Winform ou ASP ?

Sinon, peux-tu nous montrer le code d'une des procédure qui peuple ton listbox, car il faut savoir quel type d'objet tu insères dans ton listbox : de simple string ou complètement le fileInfo ?

Car là l'erreur est explicite : il n'y a pas de membre Value dans les objets que tu stocke dans ton listbox, donc si tu met de simple chaine de caractère, il faut que tu mette simplement "fileItem" dans ta boucle, si par contre tu mes des objets de type FileInfo, il faut que tu mette "fileItem.Name" ou quelques chose du genre ;)

Salut !
Merci beaucoup ça marche tu avais raison, il fallait mettre simplement "fileitem" donc le nouveau code :

Code:

1
2
3
4
5
6
7
8
    Private Sub CopyDesFichiers()
        Dim file As FileInfo
        For Each fileitem In ListboxFichiersTrouvés.Items
            file = New FileInfo(fileitem.Value)
                file.CopyTo(Path.Combine(Application.StartupPath, file.Name), True)
        Next
 
    End Sub

:ccool:

16/11/2012, 11h52
supermouton

De rien ;) content de t'avoir aidé ^^