📄 check.asp
字号:
<!--
★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
★ ★
☆ （请保留此处版权信息，这些内容并不会对您的网站运行有任何影响） ☆
★ ★
☆ 良精网店系统-白金版 ☆
★ ★
☆ 版权所有: 北京良精软件科技有限公司 ☆
★ ★
☆ 程序开发: 北京良精软件科技有限公司 ☆
★ MSN:asp3721@hotmail.com noimpulse@hotmail.com ★
☆ Tel:013366690044 销售QQ:88353022 技术QQ:812256 ☆
★ ★
☆ 相关网址:http://www.liangjing.net ☆
★ ★
☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
-->
<!--#include file="../include/buyok_shop_30_conn.asp" -->
<html><head><title>购物车-<%=sitename%>-<%=siteurl%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="Robots" content="index,follow">
<link rel="stylesheet" href="../buyok_shop.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="20" onload="self.focus();">
<%
call aspsql()
userkou=checkuserkou()
buylist=request.cookies("buyok")("cart")
if trim(request("del"))<>"" then
buylist=replace(buylist,trim(request("del")),"XXXXXXXX")
response.cookies("buyok")("cart")=buylist
end if
If Request("edit") = "ok" Then
buylist = ""
buyid = Split(Request("ProdId"), ", ")
For I=0 To UBound(buyid)
if i=0 then
buylist = "'" & buyid(I) & "', '"&request(buyid(I))&"'"
else
buylist = buylist & ", '" & buyid(I) & "', '"&request(buyid(I))&"'"
end if
Next
response.cookies("buyok")("cart") = buylist
End If
if buylist="" then
response.cookies("buyok")("total")=0
response.redirect "../shop_error.asp?error=007"
response.end
else
Set rs=conn.execute("select * from buyok_produc where ProdId in ("&buylist&") order by ProdId")
if rs.eof and rs.bof then
response.cookies("buyok")("cart") = ""
response.cookies("buyok")("total")=0
response.redirect "../shop_error.asp?error=007"
response.end
end if
end if
%>
<table width="520" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td height="30"><font color="#FF3333"><b>您选择的商品已经放入购物车，您现在可以前往收银台支付，也可以继续购物。</b></font></td></tr>
<tr><td>
<table border="0" cellspacing="1" cellpadding="4" align="center" width="567" bgcolor="#CCCCCC">
<form action="check.asp" method="POST" name="check">
<tr bgcolor="#FFFFFF">
<td width="56" height="25" align="center"><font color="B0266D">删除</font></td>
<td width="283" align="center"><font color="B0266D">商 品 名 称</font></td>
<td width="57" align="center"><font color="B0266D">数 量</font></td>
<td width="85" align="center"><font color="B0266D">结算单价</font></td>
<td width="85" align="center"><font color="B0266D">合 计</font></td>
</tr>
<%
Sum = 0
While Not rs.eof
buynum=split(replace(buylist,"'",""),", ")
for i=0 to ubound(buynum)
if rs("prodid")=buynum(i) then
Quatity=buynum(i+1)
exit for
end if
next
if not isNumeric(Quatity) then Quatity=1
If Quatity <= 0 Then Quatity = 1
Sum = Sum + csng(rs("PriceList"))*Quatity*checkuserkou()/10
%>
<tr bgcolor="#FFFFFF">
<td width="56" height="20" align="center">
<input type="hidden" name="ProdId" value="<%=rs("ProdId")%>">
<a href=check.asp?del=<%=rs("ProdId")%>><img border=0 src=../images/small/delete.gif></a>
</td>
<td width="283"> <font color="B0266D"><%=rs("ProdName")%></font></td>
<td width="57" align="center">
<input type="Text" name="<%=rs("ProdId")%>" value="<%=Quatity%>" size="4" maxlength="4" class="form">
</td>
<td width="85" align=center><font color="B0266D"><%=FormatNum(rs("PriceList")*checkuserkou()/10,2)%></font></td>
<td width="85" align=center><font color="B0266D"><%=FormatNum(rs("PriceList")*Quatity*checkuserkou()/10,2)%></font></td>
</tr>
<%
rs.MoveNext
Wend
rs.close
set rs=nothing
%>
<tr bgcolor="#FFFFFF">
<td colspan="2" height="35" align=left valign="middle"> <font color=red>注意：修改商品数量后，必须单击“修改数量”才能生效。</font></td>
<td colspan="3"><font color="B0266D"> 商品总价： <%=FormatNum(Sum,2)%> <br></font></td></tr>
<tr><td colspan="5" bgcolor="#ffffff" height=40 align=center>
<input type="submit" name="order" value="修改数量">
<input type="button" value="我的收藏" onClick="javascript:location.href='fav.asp';">
<input type="button" name="payment" value="去收银台" onClick="javascript:location.href='payment.asp';">
<input type="button" value="继续购物" language=javascript onClick="javascript:window.close()" name="button">
<input type="hidden" name="edit" value="ok">
</td></tr>
</form>
</table>
</td></tr></table>
</body></html>
<%
sum=FormatNum(sum,2)
response.cookies("buyok")("total")=sum
conn.close
set conn=nothing
%>
<!--
★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
★ ★
☆ （请保留此处版权信息，这些内容并不会对您的网站运行有任何影响） ☆
★ ★
☆ 良精网店系统-白金版 ☆
★ ★
☆ 版权所有: 北京良精软件科技有限公司 ☆
★ ★
☆ 程序开发: 北京良精软件科技有限公司 ☆
★ MSN:asp3721@hotmail.com noimpulse@hotmail.com ★
☆ Tel:013366690044 销售QQ:88353022 技术QQ:812256 ☆
★ ★
☆ 相关网址:http://www.liangjing.net ☆
★ ★
☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -