繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 购物车范例（处理页面）
- ASP
- ASP编程入门进阶（十二）：ASP技巧累加（一）
- ASP编程入门进阶（十三）：Ad & Content Rotator
- ASP编程入门进阶（十四）：Browser & Linking
- ASP编程入门进阶（十五）：组件Counters
- 一些简单的ASP练习
- ASP编程入门进阶（十六）：FSO组件之驱动器操作
- ASP编程入门进阶（十七）：FSO组件之文件夹操作
- ASP编程入门进阶（十八）：FSO组件之文件操作（上）
- ASP编程入门进阶（十八）：FSO组件之文件操作（中）
- ASP编程入门进阶（十八）：FSO组件之文件操作（下）
- ASP编程入门进阶（十九）：ASP技巧累加（二）
- ASP中有关双引号，单引号以及&号的解释
- ASP编程入门进阶（二十）：ADO组件之显示数据记录
- ASP编程入门进阶（二十）：ADO组件之插入数据记录
- ASP编程入门进阶（二十）：ADO组件之分页程序
- ASP编程入门进阶（二十）：ADO组件之修改数据记录
- ASP编程入门进阶（二十）：ADO组件之删除数据记录
- ASP初学者常犯的几个错误（ZT）
- 无组件上传图片之文件采用方案
- ASP编程入门进阶（二十）：ADO组件之查询数据记录
ASP 中的 购物车范例（处理页面）
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 70 ::
收藏到网摘: n/a
<%@ 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.write"alert(""请先登录"");" & chr(13)
response.write"history.go(-1);" & chr(13)
response.write"</script>" & chr(13)
else
'初始化购物车内变量
p_id=trim(request("id"))
P_manu=trim(request("manu"))
p_type=trim(request("type"))
p_name=replace(trim(request("name1"))," ","")
p_price=trim(request("price"))
p_size=trim(request("size"))
p_color=trim(request("color"))
p_num=trim(request("num"))
if ((not IsNumeric(p_num)) or (p_num<="0") or (instr(1,p_num,".")<>0)) then
评论 (0) All
