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