爱易网页
ASP教程
购物车范例(购物车页面 )
日期:2011-02-18 浏览次数:21074 次
<!--checkbag.asp--> <!--shoppingcart page--> <% response.expires = 0 response.expiresabsolute = Now() - 1 response.addHeader "pragma","no-cache" response.addHeader "cache-control","private" Response.CacheControl = "no-cache" %> <!--#include file= "conn.asp"--> <!--#include file= "char.inc"--> <% 'id_type=request("id_type") obj=request("obj") '用做检测是否是正常购买后的进入购物车取obj参数 rid=session("id") '取出会员id dim x,i 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_total,sum 'p_id ----商品id号 'p_name ----商品名称 'p_price ----价格 'p_manu ----制造商 'p_type ----商品式样 'p_size ----尺寸 'p_color ----颜色 'p_num ----数量 'p_total ----小计 'sum ----合计金额 dim id1 if obj="1" then obj为1说明由菜单栏点击进入的 if not isobject(Session("Bag")) then 如果Session("Bag")不是对象,说明购物车为空 response.write "<script language=""javascript"">" response.write"alert(""购物车为空!"");" & chr(13) response.write "window.location='index.asp'" respo
免责声明: 本文仅代表作者个人观点,与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。