del.asp

鄂尔多斯建站网全站程序(冬季修正版)

<!--#include file="conn.asp"-->
<!--#include file="session.asp"-->
<%
'**********************************
'版本:host_free 3.0               *
'官方网站:http://www.850518.com   *
'技术论坛:http://forum.850518.com *
'qq:54455245 (欢迎咨询商业版)     *
'msn: [e-mail]         *
'手机:[phone]              *
'mail:[e-mail]            *
'版权所有，请保留该信息，谢谢合作 *
'**********************************
%>
<%
'=========================================================
if request("action")="del_bank" then
id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from bank where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_bank.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_title" then
id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from list where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_title.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_user" then
id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from duser where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_user.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_daili" then
id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from daili where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"daili.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_shop" then
sort_id=request("sort_id")
set rs = server.createobject("adodb.recordset")
sql="select * from sort where sort_id="&request("sort_id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_shop.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_list_1" then
sub_id=request("sub_id")
set rs = server.createobject("adodb.recordset")
sql="select * from sub where sub_id="&request("sub_id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_list_new.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_list_2" then
sub_id=request("sub_id")
set rs = server.createobject("adodb.recordset")
sql="select * from sub where sub_id="&request("sub_id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_list_old.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_control_1" then
id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from control_1 where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"control_1.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_control_2" then
id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from control_2 where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"control_2.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_control_3" then
id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from control_3 where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"control_3.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_control_4" then
id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from control_4 where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"control_4.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_customer" then
c_id=request("c_id")
set rs = server.createobject("adodb.recordset")
sql="select * from customer where c_id="&request("c_id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_customer.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_friend" then
c_id=request("c_id")
set rs = server.createobject("adodb.recordset")
sql="select * from friend where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_friend.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_news" then
news_id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from news where news_id="&request("news_id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_news.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_rizhi" then
news_id=request("id")
set rs = server.createobject("adodb.recordset")
sql="select * from rizhi where id="&request("id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"rizhi.asp"
rs.close
set rs=nothing
end if
'=========================================================
if request("action")="del_ad" then
ad_id=request("ad_id")
set rs = server.createobject("adodb.recordset")
sql="select * from ad where ad_id="&request("ad_id")
rs.open sql,conn,3,3
rs.delete
rs.update
response.redirect"edit_ad.asp"
rs.close
set rs=nothing
end if
'=========================================================
conn.close
set conn=nothing
%>
<%
'**********************************
'版本:host_free 3.0               *
'官方网站:http://www.850518.com   *
'技术论坛:http://forum.850518.com *
'qq:54455245 (欢迎咨询商业版)     *
'msn: [e-mail]         *
'手机:[phone]              *
'mail:[e-mail]            *
'版权所有，请保留该信息，谢谢合作 *
'**********************************
%>