codice:
<% 
Set file1 = CreateObject("Scripting.FileSystemObject") 
Set file2 = file1.GetFolder(server.mappath("public/")) 
Set file3 = file2.Files 
For Each file in file3 
response.write "<A HREF=""b.asp?file="& file.name &""">" 
response.write file.name 
response.write "</A>
" 
Next 
%>

In "b.asp":
codice:
<% 
file=request.querystring("file")
Set fso = CreateObject("Scripting.FileSystemObject") 
fso.deletefile(server.mappath("public/"& file)) )
set fso = nothing
%>
Roby