Automatisé un programme

bonjour forum

j'ai fait un programme qui traite un fichier

comment faire pour l'automatisé cad qui traite plusieurs fichier en méme temps

merci d'avance

9 réponses

  • Votes
  • Date
  • Date décroissante
  1. salut sebsauvage

    ah oui c'est vrai j'avais oublié; c'est en VB6

    merci pour ton aide
    1. Modérateur
      Regarde dans l'aide: il doit y avoir des fonctions pour lire le contenu d'un répertoire (et récupérer la liste des fichiers qu'il contient).
      1. Re

        j'ai chercher mais j'ai rien trouvé concernat la lecture du contenu d'un repertoire
        1. Modérateur
          Ah làlà... il faut faire un peu de recherche !

          Avec google j'ai trouvé en 2 minutes:

          Dim rep As String
          'obtient le premier fichier ou répertoire qui est dans "c:\"
          rep = Dir("c:\*.*", vbDirectory)
          'boucle tant que le répertoire n'a pas été entièrement parcouru
          Do While (rep <> "")
              'teste si c'est un fichier ou un répertoire
              If (GetAttr("c:\" & rep) And vbDirectory) = vbDirectory Then
                  MsgBox "Répertoire " & rep
              Else
                  MsgBox "Fichier " & rep
              End If
              'passe à l'élément suivant
              rep = Dir
          Loop
          
          1. bonjour sebsauvage et forum

            merci pour ta recherche.

            mais j'ai essayé de l'adapter à mon programme mais avec

            open "C:\fichier.txt" for ..... ca ne marche pas.

            vous avez pas une idée?
            1. Contributeur
              essaye fichie*.txt à la place de fichier.txt...