Remplacer caractere ds un fichier txt en gardant les saut des lignes ?

Question

Salut tout le monde voila j'ai un probleme, j'ai un fichier texte avec dedans ceci (par exemple) :

aaa,bbb,ccc
ddd,eee

et j'aimerai obtenir a l'arrivée, avec un code en visual basic : 

aaa-bbb-ccc
ddd-eee

en gros remplacer les virgules par des tiret, tout en gardant les saut de lignes ils sont tres important !!

et je n'y arrive pas !!!

pouvez vous m'aider? 

phraides.

cs_neodante · Answer

8-) Neodante 8-) 

Essaye replace(TonText, ",", "-",...,vbString) ....
@+

phraides · Answer

en fait le probleme viens des virgule, car quand j'ouvre le fichier et que je lui fait lire la premiere ligne, il en sort aaa et  pas aaa,bbb,ccc  il s'arrete a la premiere virgule ...
donc j'arrive pas a les remplacer ..

please help :-D

phraides

phraides · Answer

ok j'ai trouvé je le met pour ceux qui ont ce probleme :

Open "c:\fichier.txt" For Input As #1
While Not EOF(1)
Line Input #1, ligne
If fichier = "" Then
fichier = ligne
Else
fichier = fichier & vbCrLf & ligne
End If
Wend
Close #1
fichier = Replace(fichier, ",", "-")
Open "c:\fichier.txt" For Output As #1
Print #1, fichier
Close #1

phraides.

cs_rene38 · Answer

Ou bien, pour économiser quelques lignes :

Open "c:\fichier.txt" For Input As #1
texte = Input(LOF(1), 1)
Close 1
texte = Replace(texte, ",", "-")
Open "c:\fichier.txt" For Output As #1
Print #1, texte
Close 1

z980x · Answer

Rene38, ta méthode est très bonne, mais j'ai remarqué qu'elle ne pouvait gérer que les fichiers pas trop importants...

En effet, avec ta méthode, on arrive vite à un "Dépassement de capacité"

Remplacer caractere ds un fichier txt en gardant les saut des lignes ?

5 réponses

Discussions similaires