del.asp

OA最新破解2008版 全新 破解 希望大家用着舒服

<%@ codepage ="936" %>
<%
if instr(session("flag"),"51")=0 then
response.redirect "../login.asp"
response.end
end if
%>
<!--#include file="conn.asp"-->
<%
'============================================================
'基点广告系统--COAD
'文件名：del.asp
'版  本：1.0
'编写日期：2004-3-11
'------------------------------------------------------------
'Copyright (C) 2002-2004 CECEN.net. All rights reserved.
'提供: http://www.CECEN.net, 制作：http://www.CECEN.net
'============================================================
%>
<%
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
%>