テキストファイルを１行ずつ書き出す
[vb]
Dim myFSO, myFile
Set myFSO = CreateObject("Scripting.FileSystemObject")
Set myFile = myFSO.CreateTextFile("outdata.txt")
myFile.WriteLine("Cogito ergo sum")
myFile.Close
Set myFile = Nothing
Set myFSO = Nothing
[/vb]
VBScriptでテキストファイルを１行ずつ出力するにはTextStreamオブジェクトのWriteLineメソッドを使う。
ファイルはFileSystemObjectオブジェクトのCreateTextFileメソッドで作成し、書き終わったらCloseメソッドで閉じる。
