Elimina un file specificato.
Sintassi
object.DeleteFile (filespec)
Argomenti:
FileSystemObject.Note
Si verifica un errore se non viene trovato alcun file corrispondente. Il metodo DeleteFile si arresta al primo errore rilevato. Prima che si verifichi un errore, non viene effettuato alcun tentativo di rollback o annullamento delle modifiche apportate.
Nell'esempio seguente viene illustrato l'uso del metodo DeleteFile.
Esempio 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
Nota:
Utilizzare il metodo FileExists per verificare l'esistenza del file, quindi utilizzare DeleteFile.
Esempio 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