购物车范例（处理页面）
2018-09-06 10:08
阅读：896
<!--put2bag.asp-->
<%@ Language=VBScript %>
<%
id_type=request(id_type)
on error resume next
Response.Buffer = true
Response.Expires = 0
dim obj_bag,bag_item,cart
obj_bag----购物车
bag_item----商品的信息数据集合
cart----一件商品的信息数据集合
dim p_id,p_name,p_price,p_manu,p_type,p_size,p_color,p_num,p_temp
p_id----商品id号
p_name----商品名称
p_price----原价单价
p_manu----商品制造商
p_type----商品式样
p_size----商品尺寸
p_color----商品颜色
p_num----商品数量
p_temp----临时存放p_num
if session(login)= then
response.write<script langue=javascript> chr(13)
response.writealert(请先登录); chr(13)
response.writehistory.go(-1); chr(13)
response.write</script> chr(13)
else
初始化购物车内变量
p_id=trim(request(id))
P_manu=trim(request(manu))
上一篇：asp 实现的冒泡排序程序
评论
亲，登录后才可以留言！