Código:
un saludo.gracias. Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(server.MapPath("/temp/"))
Set fc = f.Files
For Each f1 in fc
f1.delete
Next

