一个简单的网上书城的例子（七）
日期：2011-02-10 浏览次数：20941 次
clear.asp:清空所购全部物品！
<!--#include file="Util.asp" -->
<%
Head="您放入购物袋的物品已全数退回！"
DbPath = SERVER.MapPath("ShopBag.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DbPath
Session("ProductList") = ""
Session("First")="yes"
%>
<HTML>
<HEAD><TITLE><%=Head%></TITLE></HEAD>
<BODY BACKGROUND="b01.jpg">
<H2 ALIGN=CENTER><%=Head%><HR></H2>
<CENTER>
<A HREF=Check.asp>查看购物袋</A> <A HREF=Clear.asp>退回所有物品</A><P>
<% ListCategory conn %>
</CENTER>
</BODY>
</HTML>
<!--#include file="Util.asp" -->
<%
Head="您放入购物袋的物品已全数退回！"
DbPath = SERVER.MapPath("ShopBag.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DbPath
Session("ProductList") = ""
Session("First")="yes"
%>
<HTML>
<HEAD><TITLE><%=Head%></TITLE></HEAD>
<BODY BACKGROUND="b01.jpg">
<H2 ALIGN=CENTER><%=Head%><HR></H2>
<CENTER>
<A HREF=Check.asp>查看购物袋</A> <A HREF=Clear.asp>退回所有物品</A><P>
<% ListCategory conn %>
</CENTER>
</BODY>
</HTML>
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
