Lecture dans un fichier

mikaeloff Messages postés 33 Date d'inscription mardi 4 novembre 2003 Statut Membre Dernière intervention 4 décembre 2005 - 29 janv. 2004 à 20:38
mikaeloff Messages postés 33 Date d'inscription mardi 4 novembre 2003 Statut Membre Dernière intervention 4 décembre 2005 - 30 janv. 2004 à 17:27
bonjour a tous
je voudrais savoir comment lire un fichier
enchoisissant la ligne.
j'ai trouvée un code mais il commence toujour par lire la premiere ligne:

Private Sub lirepointslog() 'lecture du score enregistré dans un fichier .txt
Path = App.Path & "\points.dat"
Open Path For Input As #1
Do While Not EOF(1) = True 'regarde si a la lecture, les lignes du fichier sont vide ou contiennent qqch
Line Input #1, ligne_lue 'place la ligne lue dans le fichier dans la variable ligne_lue
Loop
Close #1
End Sub

voila si quelqun ppeut m'aider ???
merci beucoup :)

3 réponses

cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
29 janv. 2004 à 21:10
Tu as la bonne méthode, sauf qu'il faut compter le nombre de ligne dans ta boucle et t'arrêter à la ligne que tu veux lire. Je ne connais pas d'autres moyens pour lire une ligne en particulier !

DarK Sidious

[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]
0
cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
30 janv. 2004 à 01:30
Tout à fait <s>Thierry</s> Dark Sidious, s'il s'agit d'un fichier séquentiel qui, comme son qualificatif l'indique, ne peut être lu (ou écrit) qu'en séquence.
Pour lire UNE SEULE LIGNE PRECISE, il faut avoir affaire à un fichier à accès direct (Random) dont la structure est très précise, différente d'un fichier séquentiel et les commandes d'ouverure, écriture, lecture sont aussi différentes.
0
mikaeloff Messages postés 33 Date d'inscription mardi 4 novembre 2003 Statut Membre Dernière intervention 4 décembre 2005
30 janv. 2004 à 17:27
merci pour vos reponse .
je vais voir ça
:)
0
Rejoignez-nous