Aller à la première ligne d'un fichier txt

Résolu
tof72 Messages postés 33 Date d'inscription mardi 8 juin 2004 Statut Membre Dernière intervention 18 juillet 2005 - 22 sept. 2004 à 15:38
quiaimeflash Messages postés 270 Date d'inscription samedi 29 novembre 2003 Statut Membre Dernière intervention 11 juillet 2007 - 24 sept. 2004 à 18:53
bonjour

J'ai un fichier txt de cette forme

Agence1 xxx.yyy.zzz.uuuu
Agence2 xxx.yyy.zzz.uuuu
...

j'ouvre le fichier txt et je compte le nombres de lignes.
je voudrais retourner a la première ligne de mon fichier comment faire.

Merci

Je compte le nombre de ligne de la façon suivante.

Open cheminfichier & nomfichier For Input As #1
While EOF(1) = False
Input #1, strligne
i = i + 1
Wend

4 réponses

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
22 sept. 2004 à 16:43
Bonjour
ou encore écrire l'instruction :

Seek 1, 1

qui signifie : se positionner dans le fichier n° 1 (1er 1) sur l'octet n° 1 (2ème 1) c'est à dire au début du fichier.
3
quiaimeflash Messages postés 270 Date d'inscription samedi 29 novembre 2003 Statut Membre Dernière intervention 11 juillet 2007
22 sept. 2004 à 16:06
Ben si tu ouvre ton fichier txt dans un textbox tu peut mettre :

Text1.SelStart = 0


où Text1 est le nom de ton textbox.
0
econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Modérateur Dernière intervention 23 décembre 2008 23
22 sept. 2004 à 16:20
ou simplement refermer ton fichier et le réouvrir. Tu seras alors sur la première ligne.

Manu
0
quiaimeflash Messages postés 270 Date d'inscription samedi 29 novembre 2003 Statut Membre Dernière intervention 11 juillet 2007
24 sept. 2004 à 18:53
A oui exact...
J'avais employer une fois seek..
Mais je sais plus pourquoi je ne l'utilise plus, lol.
0