As one who has been bitten by "On Error Resum Next" I now eliminate it wherever it's encountered. The following snippet is much better for VBScript error handling

On Error Resume Next

[perform a statement]

[capture error variables to local variables]

On Error Goto 0

[Check local variable for error]

etc...

Also, you don't need to use VBScript to delete the files, including those in subdirectories. I use a combination of xp_dirtree, xp_getfiledetails and xp_cmdshell to list and delete files.

xp_dirtree [path], [depth], [include files]

xp_getfiledetails [file spec]