OVH Cloud OVH Cloud

Lecture de fichier Texte

2 réponses
Avatar
Patrick EVEN
Bonjour,

J'aimerai savoir comment lire un fichier texte séquentiel
pour récupérer l'intégralité de chaque enregistrement dans une seule String
même s'il contient des virgules en nombre aléatoire.

L'instruction "Input" semble en effet tenir compte des virgules
comme séparateur de champ.
De ce fait chaque instruction "Input" me donne un champ
au lieu de me donner un enregistrement complet.

D'avance merci pour vos pertinentes réponses.

Cordialement,

Patrick EVEN

2 réponses

Avatar
Jacques93
Bonjour Patrick EVEN,
Patrick EVEN a écrit :
Bonjour,

J'aimerai savoir comment lire un fichier texte séquentiel
pour récupérer l'intégralité de chaque enregistrement dans une seule String
même s'il contient des virgules en nombre aléatoire.

L'instruction "Input" semble en effet tenir compte des virgules
comme séparateur de champ.
De ce fait chaque instruction "Input" me donne un champ
au lieu de me donner un enregistrement complet.

D'avance merci pour vos pertinentes réponses.

Cordialement,

Patrick EVEN





Dim fic As Integer
Dim rec As String

fic = FreeFile()
Open "C:toto.txt" For Input As #fic
While Not EOF(fic)
Line Input #fic, rec
Debug.Print rec
Wend
Close #fic


--
Cordialement,

Jacques.
Avatar
Patrick EVEN
Bravo Jacques,

C'est la bonne réponse.

Cordialement,
Patrick EVEN