📄 my_order_view.asp
字号:
<!--#include file="include/buyok_shop_30_conn.asp" -->
<!--#include file="order/md5.asp"-->
<%
call aspsql()
call checklogin()
OrderNum=request("OrderNum")
dim jia
sqlinfo = "select A.ordertime,A.OrderNum,A.ProdId,A.BuyPrice,A.ProdUnit,A.PEI,A.FEI,B.memo,B.thiskou,B.Recname,B.RecPhone,B.Recmail,B.RecAddress,B.Zipcode,B.Paytype,B.Notes,C.ProdName "&_
" from buyok_Order A,buyok_OrderList B,buyok_produc C"&_
" where b.del<>true and A.UserId='"&request.cookies("buyok")("userid")&"' and A.OrderNum='"&OrderNum&"' and A.OrderNum = B.OrderNum and A.ProdId=C.Prodid"
set rs=Server.Createobject("ADODB.RecordSet")
rs.Open sqlinfo,conn,1,1
if rs.eof and rs.bof then
response.write "<script language='javascript'>"
response.write "alert('出错了，没有这个订单号，或者您无权查看此订单！');"
response.write "location.href='javascript:history.go(-1)';"
response.write "</script>"
response.end
else
jia=csng(rs("fei"))
userkou=csng(rs("thiskou"))
%>
<HTML>
<HEAD>
<TITLE>个人订单-<%=sitename%>-<%=siteurl%></TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="description" content="<%=sitedescription%>">
<meta name="keywords" content="<%=sitekeywords%>">
<link rel="stylesheet" href="buyok_shop.css" type="text/css">
</HEAD>
<CENTER>
<!--#include file="buyok_top.asp"-->
<table width=760 border=0 align=center cellpadding=0 cellspacing=0 bgcolor="#FFFFFF" class="grayline" >
<tr>
<td align="center" valign="top" width="185">
<!--#include file="user_center_menu.asp"-->
</td>
<td bgcolor="#CCCCCC" width="1"></td>
<td valign="top" bgcolor="#FfFfFf" width="570">
<TABLE border=0 width="100%" cellspacing="2" cellpadding="2" align=center>
<tr><td height=30>目前位置：<a href=main.asp>首页</a> > 个人订单 </td></tr>
<tr><td width="569" align="center" height="1" background="images/small/bgline.gif"></td></tr></table>
<br>
<table width="90%" border="1" cellpadding="4" cellspacing="0" bordercolor="#C0C0C0" align=center bordercolordark="#FFFFFF">
<tr><td colspan="4">订单号为<strong><font color=red> <%=rs("OrderNum")%> </font></strong> 发生时间：<%=rs("ordertime")%><br><br>
<table border=0>
<tr><td width=100 align=right>收 货 人： </td><td><%=rs("Recname")%></td></tr>
<tr><td width=100 align=right>联系电话： </td><td><%=rs("RecPhone")%></td></tr>
<tr><td width=100 align=right>电子邮箱： </td><td><%=rs("Recmail")%></td></tr>
<tr><td width=100 align=right>收货地址： </td><td><%=rs("RecAddress")%></td></tr>
<tr><td width=100 align=right>邮政编码： </td><td><%=rs("Zipcode")%></td></tr>
<tr><td width=100 align=right>配送方式： </td><td><%=rs("pei")%></td></tr>
<tr><td width=100 align=right>配送费用： </td><td><%=formatnum(rs("fei"),2)%></td></tr>
<tr><td width=100 align=right>订单备注： </td><td><%=rs("Notes")%></td></tr>
<tr><td width=100 align=right>客服处理： </td><td><font color=red><%=rs("memo")%></font></td></tr>
</table>
<tr><td>商品名称</td><td >购买数量</td><td >结算单价</td><td align="center"><font color="B0266D">合 计</font></td></tr>
<%
Total = 0
do while not rs.eof
Sum = csng(rs("BuyPrice"))*csng(rs("ProdUnit"))*userkou/10
Total = Sum + Total '计算总金额
%>
<tr>
<td ><a href="list.asp?ProdId=<%=rs("Prodid")%>" target="_blank"><%=rs("ProdName")%></a></td>
<td ><%=rs("ProdUnit")%></td>
<td ><%=formatnum(csng(rs("BuyPrice"))*userkou/10,2)%></td>
<td ><%=formatnum(sum,2)%></td>
</tr>
<%
rs.movenext
loop
end if
%>
<TR>
<TD colspan="4">
商品总价：<%=formatnum(total,2)%><br>
配送费用：<%=formatnum(jia,2)%><br>
总计费用：<b><font color=red><%=formatnum((csng(total)+jia),2)%> 元</font></b></td>
</TR>
<%
rs.close
set rs=nothing
%>
</TABLE><br>
<%
Set rs = conn.Execute("select * from pay")
pay= rs("pay")
xpay_tid=rs("xpay_id")
xpay_key=rs("xpay_key")
xpay_url=rs("xpay_url")
xpay_name=rs("xpay_name")
alipay_id=rs("alipay_id")
alipay_securityCode=rs("alipay_securityCode")
westid=rs("westid")
westback=rs("westback")
chinaid=rs("chinaid")
chinakey=rs("chinakey")
chinaback=rs("chinaback")
pay88id=rs("pay88id")
pay88name=rs("pay88name")
pay88back=rs("pay88back")
paypalid=rs("paypalid")
npsid=rs("npsid")
npsback=rs("npsback")
ipsid=rs("ipsid")
ipsback=rs("ipsback")
set rs=nothing
set rs=conn.execute("select * from buyok_orderlist where ordernum='"&ordernum&"'")
if rs.eof and rs.bof then
response.write "<script language='javascript'>"
response.write "alert('出错了，没有这个订单号！');"
response.write "location.href='javascript:history.go(-1)';"
response.write "</script>"
response.end
end if
name=rs("UserId")
inBillNo=rs("OrderNum")
RecName=rs("RecName")
Total=rs("OrderSum")
RecPhone=rs("RecPhone")
RecAddress=rs("RecAddress")
CompPhone=rs("CompPhone")
ZipCode=rs("ZipCode")
Recmail=rs("Recmail")
Notes=rs("Notes")
set rs=nothing
if pay="1" then
%>
<form action="http://www.WestPay.com.cn/Pay/WestPayReceiveOrderFromMerchant.asp" method="POST" name="SendOrderToWestPay" target=new>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width='98%'>
<tr><td height=100 valign=middle align=center>
<input type="hidden" name="MerchantID" value="<%=westid%>">
<input type="hidden" name="PostBackURL" value="<%=westback%>">
<input type="hidden" name="OrderNumber" value="<%=inBillNo%>">
<input type="hidden" name="OrderAmount" value="<%=total%>">
<input type="image" src="images/small/pay.gif" name="submit" alt="<p align=left>点击开始在线支付<br><font color=red>注意：开始支付前，请先关闭所有屏蔽IE弹出窗口的插件。</font><br><font color=blue>每个订单号每天只能支付一次（银行系统不允许重复订单号）<br>如果未支付成功，请通过购物车提交新的订单后再支付</font>">
</td></tr>
</table>
</form>
<%
elseif pay="2" then
v_rcvtel=RecPhone
v_orderemail = Recmail
v_rcvname = RecName
v_rcvaddr = RecAddress
v_rcvpost = ZipCode
v_amount=Total
v_moneytype = "0"
v_url=chinaback
v_mid =chinaid
v_oid=inBillNo
v_md5info_text = v_amount&v_moneytype&v_oid&v_mid&v_url&chinakey
v_md5info=Ucase(trim(md5(v_md5info_text)))
%>
<form method=post action="https://pay.chinabank.com.cn/select_bank" target=new>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width='98%'>
<tr><td height=100 valign=middle align=center>
<input type="hidden" name="v_md5info" size="100" value="<%=v_md5info%>">
<input type="hidden" name="v_mid" value="<%=v_mid%>">
<input type="hidden" name="v_oid" value="<%=v_oid%>">
<input type="hidden" name="v_amount" value="<%=v_amount%>">
<input type="hidden" name="v_moneytype" value="<%=v_moneytype%>">
<input type="hidden" name="v_url" value="<%=v_url%>">
<input type="hidden" name="remark1" value="<%=Notes%>">
<input type="hidden" name="v_rcvtel" value="<%=v_rcvtel%>">
<input type="hidden" name="v_rcvname" value="<%=v_rcvname%>">
<input type="hidden" name="v_rcvaddr" value="<%=v_rcvaddr%>">
<input type="hidden" name="v_rcvpost" value="<%=v_rcvpost%>">
<input type="hidden" name="v_orderemail" value="<%=v_orderemail%>">
<input type="image" src="images/small/pay.gif" name="submit" alt="<p align=left>点击开始在线支付<br><font color=red>注意：开始支付前，请先关闭所有屏蔽IE弹出窗口的插件。</font><br><font color=blue>每个订单号每天只能支付一次（银行系统不允许重复订单号）<br>如果未支付成功，请通过购物车提交新的订单后再支付</font>">
</td></tr>
</table>
</form>
<%
elseif pay="3" then
purpose=pay88name&"（订单号："&inBillNo&"）"
%>
<form method="post" action="https://www.pay88.com/pay.shtml?method=get&userid=<%=pay88id%>&purpose=<%=server.URLEncode(purpose)%>&amount=<%=total%>&mac=none" target=new>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width='98%'>
<tr><td height=100 valign=middle align=center>
<input type="image" src="images/small/pay.gif" name="submit" alt="<p align=left>点击开始在线支付<br><font color=red>注意：开始支付前，请先关闭所有屏蔽IE弹出窗口的插件。</font><br><font color=blue>每个订单号每天只能支付一次（银行系统不允许重复订单号）<br>如果未支付成功，请通过购物车提交新的订单后再支付</font>">
</td></tr>
</table>
</form>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -