一个简单的网上书城的例子（七） - 网络创业、淘金手册、投资的帮手|网友学堂

» 网友学堂 » ASP教程 » 一个简单的网上书城的例子（七） -> 查看 2008年09月11日更新

一个简单的网上书城的例子（七）

作者：wumingzhe 发表时间：2008-9-11 07:21 阅读：81次

clear.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>

#Advertisement