Fichier texte

cs_BUCK Messages postés 4 Date d'inscription dimanche 22 septembre 2002 Statut Membre Dernière intervention 15 février 2009 - 14 févr. 2009 à 21:42
cs_BUCK Messages postés 4 Date d'inscription dimanche 22 septembre 2002 Statut Membre Dernière intervention 15 février 2009 - 15 févr. 2009 à 09:57
Bonjour

je possède un fichier texte composé de:
01# blablablabla
02# blablablabla
03# blablablabla
04# blablablabla
04# blablablabla
04# blablablabla
03# blablablabla
et cela plusieurs fois je souhaiterais récupérer tous ce qui se trouve entre 03# 03#
Malheureusement lorsque je fais travaille dessus en "line input" il considère le texte en une seul ligne par contre dans wordpad j'ai bien un texte structurer.
Comment faire pour interpréter les retours a la ligne a savoir que dans notpad je n'ai qu'une seule ligne aussi par contre on peut deviner le retour chariot par un petit carre
j'ai essaye "split" pas trop cela
Merci par avance

BUCK60

2 réponses

cs_Orohena Messages postés 577 Date d'inscription vendredi 26 septembre 2008 Statut Membre Dernière intervention 20 novembre 2010 4
15 févr. 2009 à 00:03
Bonjour


Il faut que tu saches quel est ton caractère de fin de ligne, peut-être un vbLF (code 10)



Dim caractere_fin_ligne as Byte
Line Input #1, buffer
caractere_fin_ligne = Asc(Mid (buffer, Instr(1, buffer, "03") - 1))
MsgBox caractere_fin_ligne



Connaissant ce caractère, tu pourras faire ton Split :

tableau = Split(buffer, caractere_fin_ligne)

Amicalement
0
cs_BUCK Messages postés 4 Date d'inscription dimanche 22 septembre 2002 Statut Membre Dernière intervention 15 février 2009
15 févr. 2009 à 09:57
Bonjour Orohena,


Merci beaucoup, effectivement c'était un Chr(10)


Bonne journée

BUCK60
0
Rejoignez-nous