del.asp

ASP+Access

<!--#include file="conn.asp" -->
<%
if session("admin")="" then response.redirect"error.asp?id=1"
set rs=server.createobject("adodb.recordset")
'sql="select * from reg where id="&request("id")
SQLcmd = "delete from reg where id="&request("id")
db.Execute SQLcmd
'rs.open sql,db,3,3
'rs("display")=false
'rs.update
'rs.close
db.close
'set rs=nothing
set db=nothing
response.redirect"adminshow.asp"
%>