bsp;        next
            set Session("Bag")=obj_bag            将obj_bag对象里的信息，写入Session("Bag")

如果选择去收银台则准备开始接收付款
将当前信息写入购物车并转向收银程序
        case "check"                                               按钮为购买的时候
            for each cart in obj_bag.items            循环cart将其所有信息都赋给变量
                p_name=cart(0)
                p_manu=cart(1)
                p_type=cart(2)
                p_size=cart(3)
                p_color=cart(4)
                p_price=cart(5)
                p_num=cart(6)
                p_id=cart(7)
            
                if request("checkBox_" & p_id)="" then  如果取消单选框为空，取id1的值
                    id1=p_id & "," & id1                 将他们有逗号形式连接
                end if
            next
            id1=left(id1,len(id1)-1)                                  
            shopping_id=request("id")
            set obj_bag=session("bag")
            set session("obj_bag")=obj_bag    
            call insertDB(id1)                                             调用函数
    end select
%>
'输出HTML
。。。。。。。。。（略）

上一页  [1] [2]