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

迈巴客手抓饼

2016-01-29 17:28

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

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

ProductList = Session("ProductList")
Products = Split(Request("ProductID"), ", ")
For I=0 To UBound(Products)
PutToShopBag Products(I), ProductList
Next
Session("ProductList") = ProductList
%

<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

展开更多（50%）