Método DeleteFile

Exclui um arquivo especificado.

Sintaxe

object.DeleteFile (filespec)

Argumentos:

  • Object: Obrigatório. Sempre o nome de um FileSystemObject.
  • Filespec: Obrigatório. O nome do arquivo com o caminho absoluto a ser excluído.
  • Force: Opcional. Valor booliano que será verdadeiro se os arquivos com o conjunto de atributos somente leitura forem excluídos; caso contrário, será falso (padrão).

Comentários

Ocorrerá um erro se nenhum arquivo correspondente for encontrado. O método DeleteFile é interrompido no primeiro erro que encontra. Nenhuma tentativa é feita para reverter ou desfazer as alterações feitas antes de um erro ocorrer.

O exemplo a seguir ilustra o uso do método DeleteFile.

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

Use o método FileExists para verificar a existência do arquivo e, em seguida, use DeleteFile.

Exemplo 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