VBScript ファイルの作成・削除

■ファイルの作成サンプル
Dim PATH : PATH = "C:\temp\sample.txt"
Dim oFS : Set oFS = CreateObject("Scripting.FileSystemObject")

'--- ファイル作成 ---
Dim oFILE : Set oFILE = oFS.CreateTextFile(PATH, True)
oFILE.WriteLine "Hello File!"
oFILE.Close

Set oFILE =  Nothing
Set oFS = Nothing
■ファイルの削除サンプル
Dim PATH : PATH = "C:\temp\sample.txt"
Dim oFS : Set oFS = CreateObject("Scripting.FileSystemObject")

'--- ファイル削除 ---
If oFS.FileExists(PATH) Then
    oFS.DeleteFile PATH
End If

Set oFS = Nothing

コメント