Lire 1 fichier txt ligne par ligne

Résolu
thedragon25 Messages postés 67 Date d'inscription jeudi 9 novembre 2000 Statut Membre Dernière intervention 3 mai 2009 - 21 mars 2006 à 11:06
thedragon25 Messages postés 67 Date d'inscription jeudi 9 novembre 2000 Statut Membre Dernière intervention 3 mai 2009 - 21 mars 2006 à 13:34
Bonjours, je voudrais savoir comment on peut récupérer par exemple la 2eme ligne d'un fichier .txt puis la 3eme ligne pour une autre utilité en m'expliquant tout le système svp, merci.

2 réponses

cs_jperre Messages postés 268 Date d'inscription lundi 9 janvier 2006 Statut Membre Dernière intervention 19 janvier 2017 2
21 mars 2006 à 12:33
Lire un fichier fait partie des connaissances élémentaires de VB. pour lire un fichier ligne par ligne, il faut qu'il ait été enregistré avec un caractère de fin de ligne et un retour chariot à chaque fin de ligne (vbCrLf). Ensuite, il faut ouvrir le fichier en lecture séquentielle. Voici le code :

Sub ReadFile(sFileName As String)
Dim lFile As Long, sEnt As String
lFile=FreeFile 'Défini le numéro de fichier en fonction du premier numéro libre
Open sFileName For Input As #lFile 'Ouverture du fichier en accès séquentiel
'Entrée de la première ligne du fichier
Line Input #lFile, sEnt
... code de récupération des données de la première ligne (sEnt)
'Entrée de la deuxième ligne du fichier
Line Input #lFile, sEnt
... code de récupération des données de la deuxième ligne (sEnt)
'Fermeture du fichier
Close #lFile
End Sub
3
thedragon25 Messages postés 67 Date d'inscription jeudi 9 novembre 2000 Statut Membre Dernière intervention 3 mai 2009
21 mars 2006 à 13:34
Merci pour l'astuce j'ai testé et c super merci.
0
Rejoignez-nous