del_product.asp

一个非常好的旅游网站程序.

<%@ LANGUAGE="VBSCRIPT" %>
<%
if request.cookies("汕头商城")<>"9988" then
  response.redirect "../default.asp"
end if
%>
<!--#include file="conn.asp"-->
<!--#include file="pic_conn.asp"-->
<%
   dim SQL, Rs, contentID,CurrentPage
   CurrentPage = request("Page")
   contentID=request("ID")
'////////////////////////删除商品///////////////////////////////
   set rs=server.createobject("adodb.recordset")
   sqltext="delete from Product where Product_Id='"&contentID&"'"
   rs.open sqltext,conn,3,3
   set rs=nothing
   '=======================删除商品图片=============================
   set pic_rs=server.createobject("adodb.recordset")
   sqltext="delete from pic where pic_id="& contentID
   pic_rs.open sqltext,pic_conn,3,3
   
   set pic_rs=nothing
   pic_conn.close
   
   response.redirect "product_check.asp?page="&CurrentPage
%>