一个简单的网上书城的例子(七)
敬业的IT人
互联网
佚名
2008-4-14 17:59:07
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=http://www.cncms.com.cn/asp/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=http://www.cncms.com.cn/asp/Check.asp>查看购物袋</A> <A HREF=Clear.asp>退回所有物品</A><P>
<% ListCategory conn %>
</CENTER>
</BODY>
</HTML>
- 最新文章
- 一个简单的网上书城的例子(六)[04-14]
- 网络寻呼机数据库版发送消息tomessage.asp[04-14]
- 网络寻呼机数据库版处理发送消息SubmitMessage.a..[04-14]
- 网络寻呼机数据库版显示消息showmessage.asp[04-14]
- 网络寻呼机数据库版显示历史消息history.asp[04-14]
- 网络寻呼机数据库版删除选中的消息deletemessage...[04-14]
- 相关文章
