Método DeleteFile

Suprime un archivo especificado.

Sintaxis

object.DeleteFile (filespec)

Argumentos:

  • Object: necesario. Siempre es el nombre de un FileSystemObject.
  • Filespec: necesario. Nombre del archivo junto con la ruta absoluta que se va a suprimir.
  • Force: opcional. Valor booleano que es true si se van a suprimir archivos con el atributo de solo lectura definido; false (valor predeterminado) en caso contrario.

Observaciones

Se produce un error si no se encuentran archivos coincidentes. El método DeleteFile se detiene en el primer error que encuentra. No se ha intentado deshacer los cambios realizados antes de que se produjera un error.

En el siguiente ejemplo se muestra el uso del método DeleteFile.

Ejemplo 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:

Utilice el método FileExists para comprobar la existencia del archivo y, a continuación, utilice DeleteFile.

Ejemplo 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