Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Développement Développement Scripting Microsoft Vider un dossier

Vider un dossier

2 réponses
Avatar
Youri Ligotmi
Bonjour

Je cherche le moyen en vbs de vider un dossier des fichiers et
sous-dossiers (vides ou non) qu'il contient.
Merci pour votre aide
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
jbongran
"Youri Ligotmi" a écrit dans le message de news:
469bdf01$0$12383$
Bonjour

Je cherche le moyen en vbs de vider un dossier des fichiers et
sous-dossiers (vides ou non) qu'il contient.
Merci pour votre aide
Sub DeleteArbo(folderpath)

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFolder(folderpath)
fso.deleteFile(folderpath)
Set fso = Nothing
End Sub
Call DeleteArbo("D:test*.*")

Avatar
Youri Ligotmi
"Youri Ligotmi" a écrit dans le message de news:
469bdf01$0$12383$
Bonjour

Je cherche le moyen en vbs de vider un dossier des fichiers et
sous-dossiers (vides ou non) qu'il contient.
Merci pour votre aide
Sub DeleteArbo(folderpath)

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFolder(folderpath)
fso.deleteFile(folderpath)
Set fso = Nothing
End Sub
Call DeleteArbo("D:test*.*")


Merci bcp, ça fonctionne pour le mieux