Set fso = CreateObject("Scripting.FileSystemObject")
TestFilePath="tu ruta local o la obtienes con server.mappath"&request.querystring("archivo")&""
Set F = FSO.GetFile(TestFilePath)
F.Delete
Response.Write ("<h3><p align=center><font color=#004080>El Archivo ha sido Borrado</font></p></h3>")