VB6 - Récupérer la liste des fichiers d'un répertoire donné - VB/VBA/VBS - Programmation
Marsh Posté le 23-04-2002 à 18:00:25
tu crees une filelist (je sais pu le vrai nom, c le truc pour explorer qd on sauve koi...); tu regles le rep defaut, tu parcoures la liste en chopant la valeur a chaque foa, et si tu veux pas ke soit soit visible, visibeule=false
ya surement mieux comme methode
Marsh Posté le 23-04-2002 à 18:01:55
Utilise la fonction dir (c'est expliqué dans l'aide de VB)
Marsh Posté le 23-04-2002 à 18:47:24
Open App.path & "\index.dat" For Append As #10
CheMiN = Dir("D:\Inventaire\*.txt", vbNormal)
Write #10, CheMiN
Nbre_Fichiers = Nbre_Fichiers + 1
For CpT = 0 To 10000
CheMiN = Dir
If CheMiN <> "" Then
Write #10, CheMiN
Nbre_Fichiers = Nbre_Fichiers + 1
End If
Next
Je ne sais pas à l'avance combien j'ai de fichiers dans mon répertoire.. comment je pourrais faire pour continuer ce petit bout de code ?
Marsh Posté le 23-04-2002 à 17:52:19
La question est simple. Je veux récupérer la liste des fichiers d'un répertoire donné ( juste le nom de fichier ) et mettre ca dans un fichier ( un espèce de catalogue )
Merci