admin_del.asp

来自「湘域源在线产品防伪查询系统 可以查系统已有的防伪码」· ASP 代码 · 共 19 行

<!-- #include file="Include/Chk.asp" -->
<!-- #include file="Include/Conn.asp" -->
<%
	id=request("id")
	if id="" then
	Response.Write "<script language='javascript'>alert('参数错误!');document.location.href('Admin_Manage.asp');</script>"
	Response.End()
	end if
set rs=server.createobject("adodb.recordset")
rs.open "Select * from Zm_Admin where id="&Request("id"),conn,1,3
if rs.bof and rs.eof then
	Response.Write "<script language='javascript'>alert('数据库中没有该记录！');document.location.href('Admin_Manage.asp');</script>"
	Response.End()
else
	rs.Delete
	rs.Update
	Response.Write "<script language='javascript'>alert('成功删除指定的信息！');document.location.href('Admin_Manage.asp');</script>"
end if
%>