Bonjour à tous
Je travaille sur une analyse de fichiers journaux qui contiennent des données que je dois extraire sous Excel pour les analyser.
J'ai développé un bout de code pour ouvrir le fichier journal (environ 10 000 lignes si je l'ouvre avec Ultra Edit ou Bloc Notes) et lancer une analyse ligne par ligne sur une recherche de caractère pour extraire les données qui m'intéressent.
Mon problème est que je vois 255 lignes dans une seule valeur:

Voici ce que je vois avec ultra edit:

JOURNAL CREE LE 16/03/2016 A 10:29:45
---------------------------------------
---------------------------------------
AB.0455 16/03/2016 10:29:52 MOBI 836105
Mon bout de code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Open Filename For Input As #1
       While Not EOF(1)
             Input #1, Valeur_ligne
                     mon code pour analyser Valeur_ligne et extraire les valeurs
       Wend
et voici ce que je lis dans ma Valeur_ligne:
JOURNAL CREE LE 16/03/2016 A 10:29:45 --------------------------------------- --------------------------------------- AB.0455 16/03/2016 10:29:52 MOBI 836105
J'ai également essayé avec une autre méthode ci-dessous
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Set oFSO = New Scripting.FileSystemObject
            Set oFl = oFSO.GetFile(Filename)
            Set oTxt = oFl.OpenAsTextStream(ForReading)
            With oTxt
                While Not .AtEndOfStream
                    MsgBox .ReadLine
                Wend
            End With
Dans ce cas je lis bien qu'une ligne sur .readLine mais qui change à chaque ligne de code, c'est à dire que dans MsgBox .ReadLine, il affiche bien "JOURNAL CREE LE 16/03/2016 A 10:29:45" mais quand en pas à pas, je passe à la ligne Wend, la valeur a changé et la valeur de .ReadLine est devenue "---------------------------------------" ci bien que je ne peux pas faire d'analyse...

Si vous avez une idée du pourquoi, ça m'intéresse.
Merci d'avance