Discussion :

[tibofo]

Bonsoir,

Je butte sur un nouveau pb. Je lis un fichier txt qui contient de nombreuses lignes du genre :

12345678 90AB CDEFGHIJKLMNOPQSRTUVWXYZ0123456789
91369 1FACTURES FOURNISSEURS 60 401000 2 .00 383.38 31052008 25097 8787 401791 23052008F3 20080910 26258D 31052008
91370 1FACTURES FOURNISSEURS 60 401000 2 .00 332.26 31052008 25098 8787 402627 28052008F3 20080910 26258D 31052008
91371 1FACTURES FOURNISSEURS 60 401000 2 .00 428.65 31052008 25099 8787 402728 28052008F3 20080910 26258D 31052008


(il n'y a aucune tabulation dans ce txt mais seulement des espaces)

J'ai besoin d'insérer des ; à des endroits précis. Aussi j'utilise ce code adapté de ce que j'ai trouvé sur ce forum aprés recherche (je veux récupérer mes variables et enfin écrire dans un nouveau txt avec ; :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Open Chemin For Input As #1
 
Do While Not EOF(1)
 
            Input #1, LigneFichier
            NUMECRIT = Mid(LigneFichier, 1, 12)   'Mid(string, start[, length])
            NUMORDRE = Mid(LigneFichier, 13, 4)
            ....  ' le etc juste pour le forum
Loop

Mon pb est que le Input#1, LigneFichier ne lit pas toute la première ligne mais tous les premiers caractères en partant de la gauche jusqu'au 1er espace.
exemple : première ligne, il récupère seulement 12345678
sur la seconde, seulement 91369
(j'avais utilisé le même code avec un fichier txt avec des tabulations, et cela me lisait bien toute la ligne)

Comment puis je faire pour qu'il lise l'ensemble de la ligne (pour que mes MID fonctionnent correctement ensuite) ?

Merci
Thibault

[SfJ5Rpw8]

B'soir ,

pour lire le fichier ligne à ligne utilise Line Input.. :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Line input #1,LigneFichier

[tibofo]

Aprés avoir posté ma demande, je viens juste de trouver quelque chose qui semble marcher :

Mettre Line devant Input :

Line Input #1, LigneFichier

J'ai fait un test vite fait, et j'ai bien toute la ligne qui est stockée.



Merci Bbil !!