Write et fichier texte

DOMBUG Messages postés 5 Date d'inscription jeudi 26 décembre 2002 Statut Membre Dernière intervention 19 mars 2008 - 2 avril 2003 à 14:12
DOMBUG Messages postés 5 Date d'inscription jeudi 26 décembre 2002 Statut Membre Dernière intervention 19 mars 2008 - 2 avril 2003 à 15:43
Salut à tous !!!

Actuellement j'écris dans un fichier texte avec la fonction Write
mais cette fonction me génère systématiquement une double cote (") en début et fin de ligne dans mon fichier. Comment faire pour ne pas avoir ces caractères

Merci de vos réponses
Dominique

4 réponses

stevebelgium Messages postés 180 Date d'inscription lundi 17 mars 2003 Statut Membre Dernière intervention 7 juin 2003 1
2 avril 2003 à 14:37
Sub Create_File()
Dim fso, txtfile
Set fso = CreateObject("Scripting.FileSystemObject")
Set txtfile = fso.CreateTextFile("c:\testfile.txt", True)
txtfile.Write ("This is a test. ") ' Write a line.
' Write a line with a newline character.
txtfile.WriteLine("Testing 1, 2, 3.")
' Write three newline characters to the file.
txtfile.WriteBlankLines(3)
txtfile.Close
End Sub
0
pcpunch Messages postés 1243 Date d'inscription mardi 7 mai 2002 Statut Membre Dernière intervention 18 février 2019 5
2 avril 2003 à 15:13
utilise print!!!!
print #1, "montexte","montexte2"
0
DOMBUG Messages postés 5 Date d'inscription jeudi 26 décembre 2002 Statut Membre Dernière intervention 19 mars 2008
2 avril 2003 à 15:41
Merci
0
DOMBUG Messages postés 5 Date d'inscription jeudi 26 décembre 2002 Statut Membre Dernière intervention 19 mars 2008
2 avril 2003 à 15:43
Merci
0
Rejoignez-nous