指定されたファイルを削除します。
構文
object.DeleteFile (filespec)
引数:
FileSystemObjectの名前。備考
一致するファイルが見つからない場合は、エラーが発生します。DeleteFileメソッドは、最初に発生したエラーで停止します。エラーが発生する前に行われた変更のロールバックまたは元に戻す処理は試行されません。
次の例では、DeleteFileメソッドの使用方法を示します。
例1:
Sub DeleteSingleFile()
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile("C:\example1.txt") ' Deletes the specified file.
Set fso = Nothing
End Sub
Call DeleteSingleFile
注:
FileExistsメソッドを使用してファイルの存在を確認し、DeleteFileを使用します。
例2:
Sub CheckAndDeleteFile()
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists("C:\example2.txt") Then
fso.DeleteFile("C:\example2.txt") ' Deletes the specified file.
End If
Set fso = Nothing
End Sub