bs_eshop_del.asp

来自「此系统都是基于ASP+ACCESS技术开发的电子商务平台,属于全自动化、全智能的」· ASP 代码 · 共 31 行

<!--#include file="bsconfig.asp"-->
<%
'=================================
'
'   冠龙科技 公司(企业)网站管理系统
'    Apollo  [e-mail] 
'        www.xnhost.cn
'
'  copyright(c)2006 LkStar
'
'=================================
%>
<%
dim SQL, Rs, contentID,CurrentPage

CurrentPage = request("Page")
contentID=request("ID")

set rs=server.createobject("adodb.recordset")
sqltext="delete from OrderList where Form_Id="& contentID
rs.open sqltext,conn,3,3
set rs=nothing

set rs=server.createobject("adodb.recordset")
sqltext="delete from ShopList where Form_Id="& contentID
rs.open sqltext,conn,3,3
set rs=nothing
conn.close

response.redirect "Bs_Eshop.asp?page="&CurrentPage
%>