爱易网页  
                        
                            ASP教程  
                        购物车范例(购物车页面 )  
                           
                     
                    
                    日期:2011-02-18  浏览次数:21227 次 
                    
                        
                        
            <!--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
                        
                      
                    
                        
                     
                    
                        免责声明:  本文仅代表作者个人观点,与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。