Probleme de copiage sous vb.net

Signaler
Messages postés
41
Date d'inscription
lundi 10 mars 2008
Statut
Membre
Dernière intervention
28 mars 2008
-
Messages postés
661
Date d'inscription
vendredi 2 décembre 2005
Statut
Membre
Dernière intervention
23 mars 2011
-
Bonjour,<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /??>








 Je souhaite copier les fichiers du dossier
P:\BE\Thomas\essai au dossier P:\BE\Thomas\essai copiage. Pour cela j’ai créé un CheckedListBox et un ListBox et j’ai écris le programme suivant :






Imports
System.IO






 






Public

Class Form1






 







   
Private
Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load






 







       
For
Each file AsStringIn Directory.GetFiles("P:\BE\Thomas\essai")






            CheckedListBox1.Items.Add(file)






       
Next







 







       
For
Each file AsStringIn Directory.GetFiles("P:\BE\Thomas\essai copiage")






            ListBox1.Items.Add(file)






       
Next







        File.Copy("P:\BE\Thomas\essai", "P:\BE\Thomas\essai copiage", True)






   

End

Sub







 






End

Class







 







Le problème c’est qu’il n’y a pas d’erreur d’apres l’ordinateur mis quand je debug il m’écrit : The target file "P:\BE\Thomas\essai copiage" is a directory, not a file.







Et je ne sais pas quoi faire. Merci d’avance.

1 réponse

Messages postés
661
Date d'inscription
vendredi 2 décembre 2005
Statut
Membre
Dernière intervention
23 mars 2011
8
Salut,

File.Copy permet de copier des fichiers seulement pour copier un répertoire en entier, il faut que tu remplaces cette ligne de code :

File.Copy("P:\BE\Thomas\essai", "P:\BE\Thomas\essai copiage", True)

par

My.Computer.FileSystem.CopyDirectory("P:\BE\Thomas\essai", "P:\BE\Thomas\essai copiage", True)

------------------------------------------------------------------------------------------------------------------------------------------------------------

Si cette réponse vous convient, n'oubliez pas de cliquer sur le bouton Réponse Acceptée