Lecture de plusieurs fichiers en vbs

FADICO -  
jjsteing Messages postés 1613 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

JE CHERCHE A LIRE PLUSIEURS FICHIERS ET RECUPERER CERTAINES POSITIONS
MON CODE MARCHE POUR UN SEUL FICHIER POUR LES AUTRES????
AUTREMENT:
SET FS=FSO.OPENTEXTFILE(c:\mondossier\fichier.txt)
j'arrive a lire fichier.txt peut on associer a opentextfile une variable ??? c koi la syntaxe???
c trés urgent merci d'avance
Configuration: Windows XP Internet Explorer 8.0

1 réponse

  1. jjsteing Messages postés 1613 Date d'inscription   Statut Contributeur Dernière intervention   181
     
    ben fait une boucle... quelquechose comme:

    NumFich=0
    NbFich=3
    MesFichiers("c:\mondossier\fichier1.txt";"c:\mondossier\fichier2.txt";"c:\mondossier\fichier3.txt") 'Syntax a verifier
    while NumFich<NbFich
    SET FS=FSO.OPENTEXTFILE(Mesfichier(NumFich))

    'ici ce que tu veux en faire

    wend
    0