order-del.asp

西亚电子购物系统

<!--#include file="../manage/check-3.asp"-->
<!--#include file="../conn/conn.asp"-->
<%
   dim SQL, Rs, id
   id=request("ordernumber")

   set rs=server.createobject("adodb.recordset")
   sqltext="delete from sia_order where ordernumber='"&id&"'"
   rs.open sqltext,conn,3,3
   set rs=nothing
   
   set rs=server.createobject("adodb.recordset")
   sqltext="delete from sia_list where ordernumber='"&id&"'"
   rs.open sqltext,conn,3,3
   set rs=nothing

   response.redirect "manage.asp"
%>