thedragon25
Messages postés67Date d'inscriptionjeudi 9 novembre 2000StatutMembreDernière intervention 3 mai 2009
-
21 mars 2006 à 11:06
thedragon25
Messages postés67Date d'inscriptionjeudi 9 novembre 2000StatutMembreDerniè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.
cs_jperre
Messages postés268Date d'inscriptionlundi 9 janvier 2006StatutMembreDernière intervention19 janvier 20172 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