REM 書き込みモード
Const ForWriting = 2
Set Fso = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\SAMPLE\書き込みするファイル.txt", ForWriting)
REM ファイル書き込み(行)
objFile.WriteLine "書き込むデータバッファを設定します"
REM ファイルクローズ
objFile.Close
REM 初期化(どちらでも可)
Set objFile = Nothing
Set Fso = Nothing