テキストファイルに一行文字を追加したい

質問

バッチ処理でテキストファイルの最後に文字列を追加する作業をやりたいのです。
普通の文字列ですと、１）のようにして上手くいきます。
ところが「"」の入った文字列を一行加えようと２）のようにすると、エラーになってしまいます。どうしたら前に進めるでしょうか？

--------- １）上手くいくケース -----------
Set fso = CreateObject("Scripting.FileSystemObject")
Set tmpFile = fso.GetFile("C:\test\hoge.txt")
Set f = tmpFile.OpenAsTextStream(8, -2)
f.Write("一行追加しました")
f.close
Set f = Nothing
Set tmpFile = Nothing
Set fso = Nothing

--------- ２）上手くいかないケース -----------
Set fso = CreateObject("Scripting.FileSystemObject")
Set tmpFile = fso.GetFile("C:\test\hoge.txt")
Set f = tmpFile.OpenAsTextStream(8, -2)
f.Write("一行"追加"しました")
f.close
Set f = Nothing
Set tmpFile = Nothing
Set fso = Nothing

回答No.1

tsukachan · ベストアンサー

f.Write("一行"追加"しました")の”は文字列を示す囲い記号です。
ここでは　一行　と　しました　が文字列になり、間の　追加　が接続語も無ければ関数として定義してある訳でも無いのでエラーになります。
"を全角にするか
　f.Write("一行""追加""しました")
と、エスケープしてあげる必要があります。

お礼

できました。ありがとうございます！

回答No.2

chie65536

文字列中の"文字は""にします。

f.Write("一行""追加""しました")

お礼

できました。ありがとうございます！