slet mapper

Hej.

Jeg har fundet dette script et andet sted her på eksperten (dog har jeg selv forkortet det meget).

dim filesys

deltime=0
deltime=cint(180)

foldername = Wscript.arguments(0)
Set filesys = CreateObject("Scripting.FileSystemObject")
set folder = filesys.getFolder(foldername)
Set filecoll = folder.Files

For Each fil in filecoll
    if (DateDiff("H",fil.dateCreated,now())>deltime) then
    fil.Delete(true)
    end if
Next


Sådan som det står der skal det køres sådan "Filnavn.vbs c:\mappe" hvorefter det så sletter alle filer i mappen der er oprettet fra over 180 timer siden.

Kan det lade sig gøre at man også sletter mapper? eller evt at man kun sletter mapper?

På forhånd tak.

Michael