Contents
開いているTextStreamファイルを閉じます。
- 構文
- TextStream.Close
- 引数
- 戻値
プログラム実行例
一時ファイルを作成・削除
CONST TemporaryFolder = 2
DIM FSO = CREATEOLEOBJ("Scripting.FileSystemObject")
DIM Folder = FSO.GetSpecialFolder(TemporaryFolder)
DIM path = Folder.Path
DIM name = FSO.GetTempName
path = FSO.BuildPath(path, name)
PRINT path
DIM TextStream = FSO.CreateTextFile(path)
// 現在の日時をファイルに書き込む
TextStream.WriteLine(now())
TextStream.Close
// Tempファイルを削除
// FSO.DeleteFile(path)
FUNCTION now()
GETTIME()
RESULT = G_TIME_YY4 + "/" + G_TIME_MM2 + "/" + G_TIME_DD2 + " " + G_TIME_HH2 + ":" + G_TIME_NN2
FEND- CREATEOLEOBJ
- FSO.GetSpecialFolder
- FSO.Folder.Path
- FSO.GetTempName
- FSO.BuildPath
- FSO.CreateTextFile
- FSO.TextStream
- FSO.TextStream.WriteLine
- FSO.TextStream.Close
- FSO.DeleteFile
- 結果
D:\TMP\rad83BB3.tmp
この記事は役に立ちましたか？
