<%seo_title="購物車-"&sitename%>
  您的位置: 首頁 >> 購物車
<%if Request.Cookies("venshop")("user_name")="" and Request.Cookies("venshop")("guest")="" then response.redirect "login.asp?comurl=buy.asp" response.end else if Request.Cookies("venshop")("user_name")<>"" then user_name=Request.Cookies("venshop")("user_name") elseif Request.Cookies("venshop")("guest")<>"" then user_name=Request.Cookies("venshop")("guest") end if if request("action")="change" then '更改數量 if request("count")="" or Not(isNumeric(request("count"))) then count=1 else count=Cint(request("count")) end if if count<=0 then count=1 basket_id=request("basket_id") chkid(basket_id) set rs=server.createobject("adodb.recordset") sql="select hw_id,basket_count from venshop_basket where user_name='"&user_name&"' and basket_id="&basket_id&" and basket_check=0" rs.open sql,conn,1,3 if not rs.eof then hw_id=rs("hw_id") set rsh=server.createobject("adodb.recordset") sql="select hw_kucun from venshop_hw where hw_id="&hw_id&"" rsh.open sql,conn,1,1 hw_kucun=rsh("hw_kucun") if count>hw_kucun then Response.Write"" response.End else rsh.close set rsh=nothing rs("basket_count")=count rs.update end if end if rs.close set rs=nothing response.redirect "buy.asp" response.End elseif request("action")="del" then '刪除定購 basket_id=request("basket_id") chkid(basket_id) set rs=server.createobject("adodb.recordset") sql="select * from venshop_basket where user_name='"&user_name&"' and basket_id="&basket_id&" and basket_check=0" rs.open sql,conn,1,3 if rs.eof then response.redirect "buy.asp" response.End else rs.delete rs.update end if rs.close set rs=nothing response.redirect "buy.asp" response.End end if set rs=server.createobject("adodb.recordset") sql="select * from venshop_basket where user_name='"&user_name&"' and basket_check=0" rs.open sql,conn,1,3 i=0 do while not rs.eof i=i+1 set rsh=server.createobject("adodb.recordset") sql="select * from venshop_hw where hw_id="&rs("hw_id")&"" rsh.open sql,conn,1,1 if not rsh.eof then if rs("tao_id")=0 then rs("hw_price")=rsh("hw_price2") else rs("hw_price")=rsh("hw_price2")+rsh("tao_price"&rs("tao_id")) end if rs.update else rs.delete rs.update end if rsh.close set rsh=nothing rs.movenext loop rs.close set rs=nothing %>
<%set rs=server.createobject("adodb.recordset") sql="select * from venshop_basket where user_name='"&user_name&"' and basket_check=0" rs.open sql,conn,1,1 if rs.eof then%> <% else i=0 do while not rs.eof i=i+1 %> "> <% totalcash=totalcash+(rs("basket_count")*trim(rs("hw_price"))) totalisbn=totalisbn+rs("basket_count")*rs("hw_jifen") totalw=totalw+(rs("basket_count")*trim(rs("hw_weight"))) totaly=totaly+(rs("basket_count")*trim(rs("hw_yunfei"))) totalc=totalc+rs("basket_count") rs.movenext loop end if rs.close set rs=nothing%>
商品名稱 單價(<%=danwei%>) 數量 合計(<%=danwei%>) 類型 操作
你沒有選擇任何商品
0 then%>views_tao.asp?hw_id=<%=rs("hw_id")%>&tao_id=<%=rs("tao_id")%><%else%>views.asp?hw_id=<%=rs("hw_id")%><%end if%>"><%=rs("hw_name")%> <%=fuhao%><%=FormatNum(rs("hw_price"))%> "> <%=fuhao%><%=FormatNum(rs("basket_count")*rs("hw_price"))%> <%=rs("kxa")%>-<%=rs("kxb")%> ','_self','')" type="button" value="取消定購">
<%if Request.Cookies("venshop")("user_type")="" then zhekou=100 usertype_name="未登錄用戶" zhekouyu="不享受折扣價" else user_type=Request.Cookies("venshop")("user_type") set rs=server.createobject("adodb.recordset") sql="select * from venshop_usertype where usertype_id="&user_type&"" rs.open sql,conn,1,1 if rs.eof then zhekou=100 usertype_name="一般用戶" zhekouyu="不享受折扣價" else zhekou=rs("usertype_zhekou") usertype_name=rs("usertype_name") if zhekou=100 then zhekouyu="不享受折扣價" else zhekouyu="享受原價"&zhekou&"%的折扣價" end if end if rs.close set rs=nothing end if%>

<%=totalc%> 件商品 價格總計:<%=fuhao%> <%=FormatNum(totalcash)%> <%=danwei%>  您是:<%=usertype_name%>(<%=zhekouyu%>)
折后價格:<%=fuhao%> <%=FormatNum(totalcash*zhekou/100)%> <%=danwei%>  獲得積分:<%=totalisbn%>
<%if yunfei=2 then%>預計運費合計:<%=fuhao%> <%=totaly%> <%=danwei%>
<%elseif yunfei=3 then%>重量合計:<%=totalw%> kg
<%end if%> <%if mian<>0 then%><%if int(mian)>int(totalcash*zhekou/100) then%>還差<%=fuhao%><%=mian-int(totalcash*zhekou/100)%> <%=danwei%>即可免費送貨!<%else%>滿<%=fuhao%><%=mian%> <%=danwei%>免運費,您的訂單可以免費送貨!<%end if%>
<%end if%>  

<%end if%>
第一次进小姪女的身体小说,表妺好紧竟然流水了在线观看,我帮妺妺洗澡忍不住强了她