Ecrire dans un fichier texte Résolu

Question

Bonjour ,

Petit programme pour écrire dans un fichier:
--------------------------------------------
Dim NomFichier As String
NomFichier = "C:\Test.txt"

FileOpen(1, NomFichier, OpenMode.Output)
PrintLine(1, "Nom fichier est " & NomFichier)
FileClose(1)
---------------------------------------------
Avec ce petit programme , on obtient:
   Nom fichier est C:\Test.txt

Mais je voudrais écrire plutôt:
   Nom fichier est "C:\Test.txt"
Donc avec cette ponctuation "" en plus

Comment fait on ?
Si vous pouvez m'aider ?
Merci

Dedenet2

PCPT · Accepted Answer

salut,

PrintLine(1, "Nom fichier est """ & NomFichier & """") 

++
[hr]

cs_Jack · Answer

Salut
Quand tu veux insérer un " dans une chaine, elle même délimitée par des ", il te suffit de doubler le ".
Exemple :
"Coucou ""tout"" le monde"
donnera
Coucou "tout" le monde

PrintLine(1, "Nom fichier est """ & NomFichier & """")En dernier, il y en a 4 à la suite :
1 ouverture chaine
2 pour le caractère "
1 fermeture chaine

Vala
Jack, MVP VB
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)

cs_Jack · Answer

Coiffé au poteau, le PCPT (pour une fois) !

PCPT · Answer

j'vais essayer de m'en remettre

dedenet2 · Answer

Bonjour Jack ,PCPT , << A 1 min et 5 sec prés , PCPT aurait pu ravir la 1ère place ! >>. En tout cas , merci de votre réponse. Cela fonctionne bien. Ca va ne servir à créer le script pour AutoCad LT qui consistera à ouvrir un lot de fichier dwg et de les imprimer en serie. Pour ouvrir un fichier dwg, il faut écrire: ouvrir "c: est.dwg", d'où l'utilité de votre réponse. Le script fonctionne aussi. Merci A++ Dédénet2

Ecrire dans un fichier texte

5 réponses

Votre réponse

Discussions similaires