del.asp

来自「全球商务网站系统介绍 GLOBALEC.COM.CN[生成HTML版] 」· ASP 代码 · 共 30 行

<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp"-->
<%
if Request.Cookies("globalec")("globalecmaster")="" or Request.Cookies("globalec")("masterflag")="" then
response.write "<script language='javascript'>"
response.write"this.location.href='../login.asp';</SCRIPT>" 
response.end
end if
if instr(Request.Cookies("globalec")("masterflag"),"113")=0 then
response.redirect "../err.asp"
response.end
end if
%>
<%
if Request.QueryString("id")<> "" then

id = Request.QueryString("id")

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from [ad] where id=" & id
rs.Open sql,conn,1,3
rs.Delete 
set rs=nothing
conn.Close
set conn=nothing
Response.Redirect ("list.asp")
else
Response.Write "参数错误"
end if
%>