prova a fare così

<%
id = Request.QueryString("id")
Sql = "DELETE * FROM file WHERE id="&id
Conn.Execute(Sql)
conn.Close
Set conn=Nothing
response.redirect("visiona.asp")
%>