[VBS] Compter et Récuperer nom dossier Résolu/Fermé

Question

Bonjour,  
Novice en VB Script, j'aurais besoin de compter le nombre de de dossiers et récupérer leur nom, dossiers contenus dans un répertoire donné. Après de vaines recherches sur internet, j'ai trouvé comment compter et récupérer le nom de fichiers, mais rien concernant des dossiers. 
J'ai cherché à partir de ces liens: 
https://www.commentcamarche.net/contents/1168-objet-folder 
https://www.commentcamarche.net/contents/1174-objet-filesystemobject-fso 
Sans grand succès ... Si quelqu'un a une piste ... J'vous en remercie d'avance ! 
Cordialement, Allizou. 

Configuration: Windows Vista / Firefox 5.0

Allizou · Accepted Answer

J'ai finalement trouvé en cherchant encore.

Voici une fonction qui parcours tous les sous dossiers d'un répertoire et qui en retourne le nom:


Dim stRep 'Nom du répertoire à parcourir
Dim oFSO,oFld
Set oFSO = CreateObject("Scripting.FileSystemObject")
stRep = "C:\Program Files\Fichiers communs"
If oFSO.FolderExists(stRep) Then
 For each oFld in  oFSO.GetFolder(stRep).SubFolders
   Wscript.Echo oFld.Name	
 Next
End If


pour les compter, il suffit d'ajouter un incrément.
Voici le lien, il y a tout:
https://vb.developpez.com/faq/vbs

Bon courage à tous.

[VBS] Compter et Récuperer nom dossier

1 réponse

Discussions similaires