Placer l'objFSO = le CreateObject (« Scripting.FileSystemObject »)
Placer l'objTopFolder = l'objFSO.GetFolder (« C:\Books ")
Pour chaque objSubFolder dans objTopFolder.SubFolders
Pour chacun objFile dans objSubFolder.Files
WScript.Echo « suppression » et objFile
objFSO.DeleteFile objFile
Après
Pour chaque objSubSubFolder dans objSubFolder.SubFolders
WScript.Echo « suppression » et objSubSubFolder
objSubSubFolder d'objFSO.DeleteFolder
Après
Après
|