一个简单的网上书城的例子(七)

2018-09-06 11:49

阅读:410

  clear.asp:清空所购全部物品!

<!--#include file="Util.asp" -->

<%
Head="您放入购物袋的物品已全数退回!"

DbPath = SERVER.MapPath("ShopBag.mdb")
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>


评论


亲,登录后才可以留言!