<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db.mdb") Conn.execute ("DELETE FROM tabella WHERE id = "&Request("cancella")&"") Conn.Close Set Conn = Nothing Response.redirect("lista-siti.asp") %>