Windows Scripts
VBScript
Créer un répertoire (CreateFolder)


Pour : Windows


Nous allons voir comment créer un dossier avec un script VBS.
Pour créer un dossier il faut utiliser l'objet "CreateFolder".
Voir ci-dessous la syntaxe pour créer un dossier.

Syntaxe:

fso.CreateFolder(repertoire_a_creer)

Voici un exemple pour créer un dossier qui se nomme "test" dans le répertoire "C:\Windows\".

Exemple:

Set fso = WScript.CreateObject("Scripting.FileSystemObject")
fso.CreateFolder(c:\Windows\test)

Maintenant voici un script pour créer un répertoire mais en plus on va vérifier la présence du dossier de destination avant de le créer.

Exemple:

'*** Déclaration des variables d'environnement
Set fso = WScript.CreateObject("Scripting.FileSystemObject")

Dim dossier : dossier = "test"
Dim repSOURCE : repSOURCE = "c:\"
Dim repDESTINATION : repDESTINATION = "c:\Windows\"
Dim repVERIF : repVERIF = repDESTINATION & dossier

'*** On met une condition pour vérifier l'existance du dossier contenu dans la variable "repVERIF".
If fso.FolderExists(repVERIF) Then
		wscript.echo " [  ] Le dossier est déjà présent!!!"
	Else
'*** Si le répertoire n'existe pas, celui-ci sera crée.
		fso.CreateFolder(repDESTINATION & dossier)
		wscript.echo " [OK] Le dossier " & repDESTINATION & dossier & " à été créer."
End If

'*** Destruction des objets
Set fso = Nothing

Par O.Cédric
Sur www.octetmalin.net

Article publié le:
16/10/2014 21:56

Cette page vous à plus?

Dîtes que vous l'aimez en cliquant sur le bouton Facebook.

Contact - Informations -