lecture fichier texteRésolu

Question

comment puis-je faire pour commencer la lecture d'un fichier texte qu'à partir de la 2°ligne sans prendre en compte la première.
En effet la lecture de la première ligne induit une erreur VB :

Erreur d'exécution 62 :
l'entrée dépasse la fin du fichier.

dû certainement à des caractères hiérogliphes. La première ligne est en fait :
HiRTiK T9125,1,15,0450082223

comment puis-je faire SVP ??

cs_pledoux · Accepted Answer

Bonjour,

Tu peux ouvrir ton fichier en random et guetter le CRLF pour connaitre la fin de ta ligne. J'ai eu le même pb que toi et je m'en suis sorti comme ça.

dim buf as string, buf1 as string*1

    Open nom_fichier For Random As #1 Len = 1
        For j = 1 To LOF(1)
            Get #1, j, buf1
            buf = buf + buf1
            ' Si les deux dernier car sont CR+LF
            If Right(buf, 2) = Chr(13) + Chr(10) Then
                buf = Left(buf, Len(buf) - 2)
                'ici buf vaut la ligne du fichier texte sans les CRLF
            End If
        Next j
    Close #1

crenaud76 · Answer

Tu n'auras pas d'autre solution que de lire le fichier en mode Binary, plutot qu'en mode texte !!

Christophe R.

sweetygui · Answer

comment faire en binary ?
sweetygui

Lecture fichier texte

3 réponses

Discussions similaires