Gestion de fichiers (filesystem)

5/5 (10 avis)

Snippet vu 9 344 fois - Téléchargée 47 fois

Contenu du snippet

.

Source / Exemple :


'Declaration
Dim fs
Set fs = CreateObject("Scripting.FileSystemObject")

'Copie fichier.exe vèrs le_fichier.exe
fs.copyfile "C:\LE_DOSSIER\fichier.exe", "C:\UN_AUTRE_DOSSIER\le_fichier.exe", True
'pour copier tous les fichier .exe :
fs.copyfile "C:\LE_DOSSIER\*.exe", "C:\UN_AUTRE_DOSSIER\", True
'pour copier tout un Dossier :
fs.copyFolder "C:\LE_DOSSIER\*", "C:\UN_AUTRE_DOSSIER\", True
'pour cree un Rep :
fs.CreateFolder "C:\MON_REP\NOUVEAUREP"
'Suprimer tous les fichier dans un dossier (tous les *.tmp par ex)
fs.DeleteFile "C:\TEMP\*.tmp", True
'Pour suprimer un Doc :
fs.DeleteFolder "C:\WINDAUBE\*", False
'Voir si un Disque existe
fs.DriveExists ("X:") 'Cette ligne renvoi Vrai (True) ou Faux (False)
'pour terminer nous alons voir comment deplacer un Fichier
fs.moveFile "C:\windows\system\VB6fr.dll", "C:\windows\bureau\"
'ou un dossier
fs.moveFolder "C:\windows\system\", "C:\windows\bureau\System\"

A voir également

Ajouter un commentaire

Commentaires

suismohamed
Messages postés
12
Date d'inscription
jeudi 13 décembre 2007
Statut
Membre
Dernière intervention
6 mai 2013
-
votre code il me donne cet erreur (invalid outside procedure)
il ne connait pas cet ligne Set fs = CreateObject("Scripting.FileSystemObject")

merci
cs_Astalavista
Messages postés
192
Date d'inscription
lundi 24 décembre 2001
Statut
Membre
Dernière intervention
3 février 2010
-
6 Ans après ... et ça fonctionne encore :) ...
badthink54
Messages postés
7
Date d'inscription
jeudi 10 janvier 2008
Statut
Membre
Dernière intervention
5 juin 2008
-
Merci beaucoup sa sert toujours et on as pas à déchiffrer 100 lignes de codes pour trouver ce genres d'infos.
bnisaid
Messages postés
24
Date d'inscription
samedi 31 décembre 2005
Statut
Membre
Dernière intervention
3 novembre 2007
-
comment ajouter un progressbar pour
copyfolder
merci
cs_cotmar
Messages postés
71
Date d'inscription
vendredi 13 septembre 2002
Statut
Membre
Dernière intervention
9 mars 2009
-
Bonjour,

Je voudrais savoir si il est possible d'insérer votre code dans un programme VB/VBA et si oui quelle référence ajouter ?

Sinon, merci pour le source et à bientôt.

Marco.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.