Tips - WSH

 【TOP】
指定数の改行文字を出力する
FileSystemObject.WriteBlankLines メソッドは指定個数の改行文字をテキストストリームに書き込みます。
単に空文字を改行したい数だけ WriteLine メソッドで書けばよいのですが、こんなメソッドもありますよというぐらいで。 

Option Explicit
Dim fso, CurFolder, outFileStream

Set fso = WScript.CreateObject("Scripting.FileSystemObject")

Set CurFolder = fso.GetFolder(".")

Set outFileStream = fso.CreateTextFile(CurFolder.Path & "\ねこのしっぽ.txt", True)

' 文字列を出力①
outFileStream.WriteLine "塀の上のしましま模様のネコは"

' 2行空行を出力
outFileStream.WriteBlankLines 2

' 文字列を出力②
outFileStream.WriteLine "あっちを向いてしっぽを振っていた。"

outFileStream.Close

Set outFileStream = Nothing
Set CurFolder = Nothing
Set fso = Nothing
【戻る】