Revenir au début d'un fichier

Signaler
Messages postés
150
Date d'inscription
dimanche 28 septembre 2003
Statut
Membre
Dernière intervention
17 mars 2009
-
Messages postés
150
Date d'inscription
dimanche 28 septembre 2003
Statut
Membre
Dernière intervention
17 mars 2009
-
Bonjour,

Je suis en train de faire une fonction qui a besoin de lire un fichier plusieurs fois.
Mais une fois arrivé à la fin, comment revenir au début ?
Pour l'instant je ferme et je rouvre le fichier, mais je ne trouve ça pas très clean.

Merci.

4 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Salut,
Et si tu nous montrait le code utilisé? est ce que tu ne penses pas que cela serait utile.

@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
150
Date d'inscription
dimanche 28 septembre 2003
Statut
Membre
Dernière intervention
17 mars 2009

En fait je voudrai revenir au début du ficher à la fin de chaque For.
Tu n'as pas besoin de rentrer dans le détails du code.

Merci




Set fichier = FileSystem.opentextfile(fichierPref, 1, true)
        For i = 0 To nbServeursPop - 1
            expressionPopServer = "user_pref(""mail.server.server" + CStr(tabNumeroServeur(i))  + ".hostname"""
            MsgBox("Recherche : " + expressionPopServer)
           
            Do Until fichier.atendofstream
                'Lit une ligne
                chaine = fichier.readline()
                'MsgBox("Ligne lue : "+ chaine)
                copieChaine = chaine
                'Compare
                if instr(1, chaine, expressionPopServer) > 0 Then
                    MsgBox("trouve : " + chaine)
                end If
            Loop
           
            'Ferme le fichier et le rouvre pour
            fichier.Close
            'Rouvre le fichier
            Set fichier = FileSystem.opentextfile(fichierPref, 1, true)
        Next
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Re,
Ok,
Mais alors on peux se demander l'intéret de retourner au début du fichier.
Pourquoi de pas le lire TOUT d'un seul coup et ensuite de le  garder en mémoire dans un tableau de string?

@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
150
Date d'inscription
dimanche 28 septembre 2003
Statut
Membre
Dernière intervention
17 mars 2009

Laisse tomber, c'est pas grave. J'ouvrirai le fichier à chaque fois.