bonjour tout le monde,
 
Je rencontre un problème sur une apppli que je suis en train de faire, et malgré mes recherches sur le foum je n'ai pas encore de trouver de réponses, alors me voici.
J'ai dans un dossier des fichiers textes qui sont générées par un vbscript, et je voudrais que mon appli lise ces x fichiers pour en recupérer quelques infos.
J'ai pas de pb pour le faire sur un fichier, mais avec plusieurs je ne vois pas quoi mettre dans "open" .
Il faudrait que j'arrive a lire chaque nom de fichier avant, mais je sais pas comment faire. Alors si vous pouvez m'aider ca serait vraiment sympa.
Merci d'avance.

Dim FSO As New Scripting.FileSystemObject
Dim DossierSource As Scripting.Folder, SousDossier As Scripting.Folder
Dim fichier As Scripting.File
 
   ' Set FSO = Scripting.FileAttribute
    Set DossierSource = FSO.GetFolder(Dossier)
     
    For Each fichier In DossierSource.Files
        tontraitement
    Next

Merci, je vais essayer ca demain.

Le code que tu m'as fourni ne fonctionne pas sous vb6. C'est vrai que je n'ai pas précisé que c'est sous vb6 que j'essaye de faire ma manip.

Son code doit fonctionner en VB6 en ajoutant au projet la référence à la bibliothèque « Microsoft Scripting Runtime » (fichier SCRRUN.DLL)

ah ok , je vais voir ca des que je peux, merci