Méthode DeleteFile

Supprime un fichier spécifié.

Syntaxe

object.DeleteFile (filespec)

Arguments :

  • object : requis. Toujours le nom d'un objet FileSystemObject.
  • filespec : requis. Nom du fichier à supprimer, avec le chemin absolu associé.
  • force : facultatif. Valeur booléenne True si des fichiers en lecture seule doivent être supprimés et False (valeur par défaut) dans le cas contraire.

Remarques

Une erreur survient si aucun fichier correspondant n'est trouvé. La méthode DeleteFile s'arrête à la première erreur rencontrée. Aucune tentative n'est effectuée pour restaurer les éléments ou annuler les modifications apportées avant la survenue de l'erreur.

Les exemples suivants illustrent l'utilisation de la méthode DeleteFile.

Exemple 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

Remarque :

Utilisez la méthode FileExists pour vérifier que le fichier existe, puis utilisez DeleteFile.

Exemple 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