Lecture de fichier texte avec récupération des espaces....

Question

Bonjour,

J'ai en entrèe un fichier texte et je dois lire ligne par ligne le fichier.
Mon souci est que je ne récupére pas les espaces devant et je n'arrive pas à comprendre pourquoi.

exemple :
dans le fichier une ligne : "                               TOTO"
quand je lis la ligne dans une variable String cela me donne "TOTO"

Ca doit être un truc tt con en plus.
merci d'avance

NHenry · Answer

Bonjour

utilises ltrim, rtrim ou trim pour supprimer les espaces.

Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
Une question se pose sur le forum, pas en privé
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

interkira · Answer

je ne veux pas les supprimer bien au contraire mais les récuperer

econs · Answer

Salut,


Si tu recueilles ta ligne en faisant :


Line Input #1, maLigne


les espaces devraient s'y trouver.







Dim s As String

Open "C:	oto.txt" For Input As #1

    Line Input #1, s

Close #1

MsgBox "@@" & s & "@@"





Les @@ servent juste à montrer qu'il y a des espaces dans la chaine 's'.

Manu

interkira · Answer

Ah j'ai un autre souci incompréhensible
à la derniére ligne lu l'errer 62 (L'entrée dépasse la fin de fichier) survient...

NHenry · Answer

Bonjour

C'est vraisemblablement que tu controle mal la boucle de lecture de ton fichier.
Normalement ça devrait être 
Do Until Eof(1)

Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
Une question se pose sur le forum, pas en privé
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

interkira · Answer

l'erreur survient lors de la lecture de la derniére ligne donc ce n'est pas la fin

NHenry · Answer

Bonjour

Clairement, le message d'erreur te dit que tu lis après la fin du fichier.
Si la solution précédente ne fonctionne pas, peux-tu poser le code de ta boucle de lecture.

Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
Une question se pose sur le forum, pas en privé
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

econs · Answer

Pour tout lire :






Dim s As String
 Open "C:	oto.txt" For Input As #1
    While Not EOF(1)

        Line Input #1, s

    Wend
 Close #1






Manu

Lecture de fichier texte avec récupération des espaces....

8 réponses

Votre réponse

Discussions similaires