Enlever les espaces d'un TXT
scharly3
Messages postés
88
Date d'inscription
mardi 1 juillet 2003
Statut
Membre
Dernière intervention
9 juillet 2009
-
28 avril 2005 à 17:41
crenaud76 Messages postés 4172 Date d'inscription mercredi 30 juillet 2003 Statut Membre Dernière intervention 9 juin 2006 - 29 avril 2005 à 11:47
crenaud76 Messages postés 4172 Date d'inscription mercredi 30 juillet 2003 Statut Membre Dernière intervention 9 juin 2006 - 29 avril 2005 à 11:47
A voir également:
- Combo list txt
- Imprimante virtuelle txt ✓ - Forum Java
- Combo list - Forum Visual Basic
- C# list ✓ - Forum C# / .NET
- Bloc note txt - Forum PHP
- Hotmail fr txt - Forum C# / .NET
2 réponses
FFkiller
Messages postés
72
Date d'inscription
lundi 28 juin 2004
Statut
Membre
Dernière intervention
12 mai 2005
1
28 avril 2005 à 17:49
28 avril 2005 à 17:49
Vas voir : <#href:> http://www.vbfrance.com/forum.v2.aspx?ID=445177 </href>
FFkiller
FFkiller
crenaud76
Messages postés
4172
Date d'inscription
mercredi 30 juillet 2003
Statut
Membre
Dernière intervention
9 juin 2006
28
29 avril 2005 à 11:47
29 avril 2005 à 11:47
Voici un bout de code ...
Dim Fn as long, Buffer as string
fn =freefile
open "Fic.txt" for input as #fn
buffer = input(lof(fn), #fn)
Close #fn
buffer = replace$(buffer, " ", "")
Open "Fic.txt" for output as #fn
print #fn, buffer
Close #fn
Christophe R
Dim Fn as long, Buffer as string
fn =freefile
open "Fic.txt" for input as #fn
buffer = input(lof(fn), #fn)
Close #fn
buffer = replace$(buffer, " ", "")
Open "Fic.txt" for output as #fn
print #fn, buffer
Close #fn
Christophe R
