OVH Cloud OVH Cloud

Lire fichier texte énorme

3 réponses
Avatar
JMH
Bonjour
J'ai un fichier txt qui sont des records venant d'un autre système. (record
variable en longueur)
En important automatiquement, il ne le fait pas juste.
Je désire juste prendre chaque ligne jusqu'à la marque de fin de record ODOA
Donc je lis le fichier séquentiellement avec Open xx for input

le problème, mon fichier se compose commet suit:

^ab11(1000, 234, "2345, 1987") ICI=ODOA

et lorsque je le lis, il ne va que jusqu'à la virgule... et ainsi de suite

Merci d'avance de bien vouloir m'éclairer.

Jean-Michel H.

3 réponses

Avatar
JMH
Je dois faire Line Input
ou lieu de Input

Sorry


"JMH" a écrit dans le message de news:
evmghU$
Bonjour
J'ai un fichier txt qui sont des records venant d'un autre système.
(record variable en longueur)
En important automatiquement, il ne le fait pas juste.
Je désire juste prendre chaque ligne jusqu'à la marque de fin de record
ODOA
Donc je lis le fichier séquentiellement avec Open xx for input

le problème, mon fichier se compose commet suit:

^ab11(1000, 234, "2345, 1987") ICI=ODOA

et lorsque je le lis, il ne va que jusqu'à la virgule... et ainsi de suite

Merci d'avance de bien vouloir m'éclairer.

Jean-Michel H.





Avatar
Eric
Bonjour,

J'arrive après la bataille mais tu pouvais aussi tout charger dans une
variable et splitter après sur ODOA pour avoir chacun des
enregistrements. Avec Line Input il s'arrete à chaque vbCr ou vbCrLf

Style :
Dim f as Integer, strChaine as string
f= Freefile
Open ...
strchaine=Input(lof(f),#f)
Close #f
puis faire un split(strchaine,"ODOA"), tu récupères un tableau avec
chaque enregistrement.

Bonjour
J'ai un fichier txt qui sont des records venant d'un autre système. (record
variable en longueur)
En important automatiquement, il ne le fait pas juste.
Je désire juste prendre chaque ligne jusqu'à la marque de fin de record ODOA
Donc je lis le fichier séquentiellement avec Open xx for input

le problème, mon fichier se compose commet suit:

^ab11(1000, 234, "2345, 1987") ICI=ODOA

et lorsque je le lis, il ne va que jusqu'à la virgule... et ainsi de suite

Merci d'avance de bien vouloir m'éclairer.

Jean-Michel H.





--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Paul
Bonjour,

Et si le fichier est énorme, comme annoncé, tu crois que le tableau va
contenir, par exemple, un million d'enregistrements ?

--
Paul



Bonjour,

J'arrive après la bataille mais tu pouvais aussi tout charger dans une
variable et splitter après sur ODOA pour avoir chacun des
enregistrements. Avec Line Input il s'arrete à chaque vbCr ou vbCrLf

Style :
Dim f as Integer, strChaine as string
f= Freefile
Open ...
strchaine=Input(lof(f),#f)
Close #f
puis faire un split(strchaine,"ODOA"), tu récupères un tableau avec
chaque enregistrement.


Bonjour
J'ai un fichier txt qui sont des records venant d'un autre système.
(record variable en longueur)
En important automatiquement, il ne le fait pas juste.
Je désire juste prendre chaque ligne jusqu'à la marque de fin de
record ODOA
Donc je lis le fichier séquentiellement avec Open xx for input

le problème, mon fichier se compose commet suit:

^ab11(1000, 234, "2345, 1987") ICI=ODOA

et lorsque je le lis, il ne va que jusqu'à la virgule... et ainsi de
suite

Merci d'avance de bien vouloir m'éclairer.

Jean-Michel H.