Discussion :

[didierdarras]

Je souhaite aller lire dans un répertoire du disque d'un PC ( distant ou pas ), le nombre de fichiers de type EXE !

Comment faire en VB6 ?

[Chatbour]

Salut,

Voici une solution avec un script Batch :
Vous récupérez, dans un fichier, le nombre de fichiers .EXE, puis vous lisez la valeur sauvegardée avec VB..

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
ChDir ("c:\")
dim NbrExe as String
NbrExe = "cmd /k dir *.exe /s | find "".exe"" /c > fichier.txt"
Shell NbrExe, vbHide

C'est pas la solution idéale mais en attendant..

[ProgElecT]

Ou encor, un FileListBox (visible ou pas suivant le besoin), avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Dim NbrDeFichier As Integer
FileListBox.Pattern = "*.EXE"
 'Chemin PC local
FileListBox.Path = "C:\Le Dossier\Le Sous Dossier" 
 'ou chemin nom du partage du PC distant
FileListBox.Path = "Z:\Le Dossier Partagé\Le Sous Dossier Partagé" 
NbrDeFichier = FileListBox.ListCount 'tu obtiens le nombre de fichier EXE
Label1 = FileListBox.List(0) 'te renvoie le nom du 1° fichier .EXE de la liste.

Un F2 te donneras plus de détails sur le FileListBox

[ucfoutu]

Bonsoir,

Les solutions sont aussi nombreuses que variées.

MAIS ...

didierdarras n'a absolument pas précisé si les fichiers .exe objets de sa "pêche" se trouvaient tous à la racine du répertoire choisi ou s'il voulait également aller à la pêche de fichiers .exe éventuellement situés dans des sous-répertoires du dit répertoire ...
ET CELA PEUT TOUT CHANGER
Je m'abstiens donc de répondre tant que cette précision importante n'est pas apportée ici.

Bonne continuation...

[LeForestier]

Bonjour,
Quel que soit ce que didierdarras veux faire, il trouverras une solutions Dans ces Tuto
A+

[didierdarras]

Comment créér simplement en code VB6 , une liste de tous les fichiers d'un même type ( .txt, .exe, .xls ou .vbs par exemple ) dans un répertoire racine donné, sans pour autant chercher ceux se trouvant dans les sous-répertoires ?
Merci à vous tous !

[OhMonBato]

Tu veux dire chercher par exemple tous les fichiers txt et seulement ceux là ou faire une liste de tous les fichiers d'un répertoire et les trier par extension ?

[ucfoutu]

Même l'utilisation bête et méchante de Dir permet la chose ... !!!
Voir ceci, par exemple (pour VBA mais va avec VB6 égalemen) :

http://www.developpez.net/forums/sho...88&postcount=5