if request.querystring("action")="del" then
set fso=CreateObject("Scripting.FileSystemObject")
response.write Request("FileName")
whichfile=server.mappath(Request("FileName"))
Set thisfile = fso.GetFile(whichfile)
thisfile.Delete True
end if
set fso=CreateObject("Scripting.FileSystemObject")
response.write Request("FileName")
whichfile=server.mappath(Request("FileName"))
Set thisfile = fso.GetFile(whichfile)
thisfile.Delete True
end if