Sujet Précédent Sujet Suivant

Esquiver le retour a la ligne en fichier txt

Ivynox Messages postés 10 Date d'inscription vendredi 4 février 2005 Statut Membre Dernière intervention 9 décembre 2009 - 22 févr. 2005 à 21:45
cbnet Messages postés 176 Date d'inscription vendredi 29 octobre 2004 Statut Membre Dernière intervention 7 mars 2005 - 23 févr. 2005 à 01:27
voila le topo... mon fichier ne comporte qu'une seule ligne mais je
n'arrive pas a contourner le probleme de ce @}!§? de retour chariot
automatique..



Si vous trouvez une réponse transmettez la moi vite! ^^

ivynox roxx for learn!

2 réponses

Réponse 1 / 2
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 79
22 févr. 2005 à 23:25
Salut
Je vois pas trop où est ton problème ... explique ce que tu n'arrives pas à faire, on n'est pas devin !

Si tu veux charger en une fois le contenu d'un fichier :

Open "MonFichier.txt" As Binary For Input #1
Contenu = String(LOF(1), " ")
Get #1, , Contenu
Close #1

Vala
Jack
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)
0
Réponse 2 / 2
cbnet Messages postés 176 Date d'inscription vendredi 29 octobre 2004 Statut Membre Dernière intervention 7 mars 2005
23 févr. 2005 à 01:27
tu n'es pas assez précis dans ta question, c'est pour lire un fichier
ou pour l'enregistrer. Il est vrai que lorsque tu enregistres un
fichier avec la méthode Output, ça te rajoute un retour chariot
(CF,LF), mais si je ne me trompe pas si tu l'enregistres avec un accès
Binary, ça n'est pas le cas

Open "C:\Fichier.txt" For Binary As #1

Put #1, , Data$

Close #1



Mais sinon dans la lecture tu peux toujours contourner le problème en
supprimant ce CRLF si il te gène. Dans ton cas tu n'as qu'une seule
ligne, si tes données sont dans Data$, tu fais ceci :

Data$ = Right$(Data$, Len(Data$) - 2)



@+
0
Rejoignez-nous