Löscht eine angegebene Datei.
Syntax
object.DeleteFile (filespec)
Argumente:
FileSystemObject.Anmerkungen
Ein Fehler tritt auf, wenn keine entsprechenden Dateien gefunden werden. Die DeleteFile-Methode wird beim ersten auftretenden Fehler gestoppt. Es wird nicht versucht, Änderungen zurückzusetzen oder rückgängig zu machen, die vor dem Auftreten eines Fehlers vorgenommen wurden.
Das folgende Beispiel veranschaulicht die Verwendung der DeleteFile-Methode.
Beispiel 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
Hinweis:
Prüfen Sie mit der FileExists-Methode, dass die Datei vorhanden ist, und verwenden Sie anschließend DeleteFile.
Beispiel 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