1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6

[Catégorie modifiée .Net -> VBS] rmdir en fichier vbscript [Résolu]

Signaler
Messages postés
24
Date d'inscription
samedi 6 mai 2006
Statut
Membre
Dernière intervention
23 décembre 2010
 -
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
 -
salut

Je souhaite exécuter une commande dos à partir d'un fichier vbs, mais j'ai toujours le message suivant:Le fichier spécifié est introuvable.
Je souligne que j'ai mis le fichier vbs en C:\, et le répertoir rep est créé
Voici mon code:
Set fso = CreateObject("Scripting.FileSystemObject")
set shl = createobject("wscript.shell")
shl.run "rmdir /s/q" +chr(34)+"c:\rep"+chr(34),0,true

Merci pour votre aide
Afficher la suite

5 réponses

Réponse 1 / 5
Messages postés
1854
Date d'inscription
jeudi 23 mai 2002
Statut
Membre
Dernière intervention
24 juin 2018
 26
 Bonjour,



En effet, la méthode DeleteFolder supprime un dossier spécifié et son contenu.

object.DeleteFolder ( folderspec[, force] );

Arguments
object
Requis. Doit toujours correspondre au nom d'un objet FileSystemObject.

folderspec
Requis. Nom du dossier à supprimer. folderspec peut comporter des
caractères génériques dans le dernier composant du chemin.

force
Facultatif. Valeur booléenne qui est true si des dossiers en lecture
seule doivent être supprimés et false (valeur par défaut) dans le cas contraire.

Notes
La méthode DeleteFolder ne fait pas la distinction entre dossiers ayant un contenu et dossiers vides. Le dossier spécifié sera supprimé sans tenir compte de son contenu éventuel.

Une erreur se produit si aucun dossier correspondant n'est trouvé.
La méthode DeleteFolder s'arrête à la première erreur qu'elle rencontre.
Aucune tentative n'est faite en vue de restaurer ou d'annuler les changements effectués avant que l'erreur se produise. 

Const MyFolder = "c:\REP"
If CreateObject("Scripting.FileSystemObject").FolderExists(MyFolder) = True Then 
   CreateObject("Scripting.FileSystemObject").DeleteFolder(MyFolder), True
End If



jean-marc
Réponse 2 / 5
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
 70
Salut

Ce n'est pas du VB.Net mais du VBS --> modif catégorie

Je pense qu'il manque un espace entre le /q et le nom du répertoire.
D'autre part, je pense aussi qu'un nom de répertoire doit se terminer par un point
Mais pourquoi n'utilises-tu pas la fonction DeleteFolder de FileSystemObject ?

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
Réponse 3 / 5
Messages postés
24
Date d'inscription
samedi 6 mai 2006
Statut
Membre
Dernière intervention
23 décembre 2010
Salut,

JMO je te remercie infiniment.
Votre réponse m'a apporté du l'eau au moulin:D

CDT
Réponse 4 / 5
Messages postés
24
Date d'inscription
samedi 6 mai 2006
Statut
Membre
Dernière intervention
23 décembre 2010
salut jack;

Pour mon code, j'ai oublié d'ajouter "cmd.exe /c".
shl.run "cmd.exe /c rmdir /s/q" +chr(34)+"c:\rep"+chr(34),0,true
Concernant la catégorie j'ai pas trouvé la catégorie adéquate(vbs).
En plus, je ne sais pas comment la modifié):.

CDT
Réponse 5 / 5
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
 70
Ok Yassine
J'ai modifié la catégorie, je voudrais seulement que tu regarde comment elle s'appelle pour la choisir lors de ta prochaine question.
Répondre Posez votre question