Fichiet TXT [Résolu]

Signaler
Messages postés
22
Date d'inscription
vendredi 20 décembre 2013
Statut
Membre
Dernière intervention
26 janvier 2015
-
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
-
Bonjour,
Je voudrais savoir svp comment je dois récupérer la 2eme lignes dans un fichier
ou bien la 3 lignes

merci d'avance

2 réponses

Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
237
Bonjour,
en commençant par l'ouvrir en lecture.
Reviens s'il te plait avec le code tenté après avoir lu ce que te dit ton aide VB6 ouverte à la rubrique Instruction Open.

Messages postés
22
Date d'inscription
vendredi 20 décembre 2013
Statut
Membre
Dernière intervention
26 janvier 2015

Bonjour,
voci le code que j'ai mis :

Dim TextLine
Dim f As Integer
f = FreeFile
Open ".\path.txt" For Input As #f ' Ouvre le fichier.
Do While Not EOF(f) ' Effectue la boucle jusqu'à la fin du fichier.
Line Input #f, TextLine ' Lit la ligne dans la variable.
Loop
Close #f

pour info mon fichier txt contient 2 ligne exe

C:\Documents and Settings\Bureau\app\IN
C:\Documents and Settings\
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
237
Hé bien ...
Le code, tel que tu l'as écrit, lit chaque ligne du fichier, une par une, dans ta boucle While.
Si tu veux lire la ligne 2, ajoute-lui donc un petit compteur tout bête et affiche Textline lorsque ce compteur = 2 !
Ce que tu cherches à mettre dans une variable est tout bêtement le contenu de TextLine lorsque ton compteur = 2 !

Je ne comprends vraiment pas comment tu peux avoir une difficulté avec ce qui est aussi rudimentaire.