Faire un couper coller d'un fichier

Résolu
Le newbie
Messages postés
200
Date d'inscription
mardi 17 octobre 2006
Statut
Membre
Dernière intervention
24 mars 2012
- 18 oct. 2006 à 11:13
cs_casy
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
- 18 oct. 2006 à 13:25
Salut,

Je voudrais savoir comment je peux faire un couper-coller d'un fichier vers un dossier (existant)
ou alors un copier-coller et ensuite supprimer le fichier source.

Merci de votre aide à tous.

3 réponses

cs_casy
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
18 oct. 2006 à 13:25
Bien sur qu'il y a une erreur.

La syntaxe de Move c'est .Move(FichierSource,FichierDestination) et non pas .Move(fichierSource, répertoire).

b = "c:\exe \
"

for each a In IO.Directory.GetFiles(C:\Tempo, "*.*")
      IO.File.Move(a, b  & Path.GetFileName(a)
)
next

---- Sevyc64  (alias Casy) ----<hr size ="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #
3
cs_casy
Messages postés
7741
Date d'inscription
mercredi 1 septembre 2004
Statut
Membre
Dernière intervention
24 septembre 2014
41
18 oct. 2006 à 11:25
Regarde du coté de la classe System.IO.File

.Copy pour la copie
.Delete pour la suppression du fichier
.Move pour le déplacer

---- Sevyc64  (alias Casy) ---- # LE PARTAGE EST NOTRE FORCE #
0
Le newbie
Messages postés
200
Date d'inscription
mardi 17 octobre 2006
Statut
Membre
Dernière intervention
24 mars 2012
2
18 oct. 2006 à 12:46
Salut casy,

Mon problème est que lorsque je fais le move(Fichier avec chemin, chemin)

il me dit : Impossible de créer un fichier déjà existant or je te confirme que dans le répertoire de destination, il n'y a rien du tout.

De plus, je te confirme que mes variables ont bien les bonnes valeurs.

Pour info :

dim a as string
dim b as string

b = "c:\exe"

for each a In IO.Directory.GetFiles(C:\Tempo, "*.*")
      IO.File.Move(a, b)
      ' Il y a une erreur
next

'Valeur de mes variables
a = "C:\Tempo\toto.txt"
b = "c:\exe"

Je ne comprends pas ???

Merci de ta précieuse aide.
0