主题:  求ASP写的用COOKIES的购物车代码

水木

职务:普通成员
等级:1
金币:0.0
发贴:145
#12003/3/10 17:20:27
最近想学做购物车,
可找不到教材,
要么太复杂,
要么不好用。
哪位老兄给指点一二。



绿茶

职务:普通成员
等级:8
金币:10.0
发贴:19267
#22003/3/11 9:32:58
这是我写的一个比较简单的使用COOKIES储存商品信息的代码:
购物车:
if trim(request("id"))<>"" then
x=""
stock=request.cookies("sell")("buy")
add=request("id")
If Len(stock) = 0 Then
stock = add&",1|"
else
a=split(stock,"|")
j=ubound(a)
tag=0
for i=0 to j-1
b=split(a(i),",")
if (b(0)=add) then
b(1)=b(1)+1
tag=1
end if
x=x&b(0)&","&b(1)&"|"

next
if tag=1 then
stock=x
else
stock=stock&add&",1|"
end if
End If
response.cookies("sell")("buy")=stock
Response.Cookies("sell").Expires = dateadd("d","1",date())
end if

更改商品数量:
<%
if request("Update")="修改" then
xx=""
stock=""
if request.cookies("sell")("buy")<>"" then
for tt=1 to request("stock_num").count
add=cint(request("stock_num")(tt))
stock=request.cookies("sell")("buy")
ab=split(stock,"|")
bs=split(ab(tt-1),",")
bs(1)=add
xx=xx&bs(0)&","&bs(1)&"|"
next
stock=xx
response.cookies("sell")("buy")=stock
end if
end if%>

收藏夹也是差不多道理

编辑历史:[这消息被germchen编辑过(编辑时间2003-03-11 09:37:29)]


水木

职务:普通成员
等级:1
金币:0.0
发贴:145
#32003/3/11 22:11:33
我好崇拜你啊!
多谢!多谢!!