del.asp

一个不错的个人商务网站的源码

<%
dim dbpath
dbpath="../"
%>
<!--#include file="chk.asp"-->
<!--#include file="../db_conn.asp" -->
<!--#include file="../comm/my_request.asp" -->
<%
   Page = my_request("Page",1)
   id=my_request("id",0)

   sqltext="delete from buyer where ddbh='"&id&"'"
   conn.execute (sqltext)
   
   sqltext="delete from list where cartbh='"&id&"'"
   conn.execute (sqltext)
   

   conn.close
   set conn=nothing
   response.redirect "AdminOrderList.asp?page="&Page
%>