<% dim delesql dim useridtxt dim pagetxt useridtxt = Request("userid") pagetxt = Request("cpage") delesql="DELETE FROM Book WHERE id=" & useridtxt conn.Execute delesql set conn=nothing response.redirect "admin.asp?page=" & pagetxt %>