📄 ordersent.asp

📁 这是一个很漂亮的网站购物系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!--
★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
★                                                                  ★
☆ （请保留此处版权信息，这些内容并不会对您的网站运行有任何影响）   ☆
★                                                                  ★
☆                良精网店系统-白金版                              ☆
★                                                                  ★
☆  版权所有: 北京良精软件科技有限公司                              ☆
★                                                                  ★
☆  程序开发: 北京良精软件科技有限公司                              ☆
★            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" -->
<!--#include file="md5.asp" -->
<HTML><HEAD><TITLE>订单提交成功</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../buyok_shop.css" type="text/css">
</HEAD>
<script language=javascript>
window.opener.location.reload()
</script>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="20">
<%
'call aspsql()
call buyok_check_path()
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
Name=request.cookies("buyok")("userid")
if Name="" then Name="游客"
RecName=request.form("RecName")
RecPhone=request.form("RecPhone")
CompPhone=request.form("CompPhone")
Gettime=request.form("Gettime")
RecAddress=request.form("RecAddress")
Notes=request.form("Notes")
Recmail=request.form("Recmail")
Zipcode=request.form("ZipCode")
Pei=request.form("pei")
Fei=request.form("fei")
sum=request.form("sum")
'buylist=request.form("buylist")
buylist = request.cookies("buyok")("cart")
userkou=checkuserkou()
if reg<>"1" and request.cookies("buyok")("userid")="" then
response.redirect "../shop_error.asp?error=006"
response.end
end if
if buylist="" then
response.cookies("buyok")("cart")=""
response.cookies("buyok")("total")=""
response.redirect "../shop_error.asp?error=007"
response.end
end if
if csng(sum)=0 then
response.cookies("buyok")("cart")=""
response.cookies("buyok")("total")=""
response.redirect "../shop_error.asp?error=007"
response.end
end if
total=FormatNumber(sum,2)
randomize
d=right("00"&int(99*rnd()),2)
yy=right(year(date),2)
mm=right("00"&month(date),2)
dd=right("00"&day(date),2)
riqi=yy & mm & dd
xiaoshi=right("00"&hour(time),2)
fenzhong=right("00"&minute(time),2)
miao=right("00"&second(time),2)
inBillNo=yy & mm & dd & xiaoshi & fenzhong & miao & d
set rsadd=server.createobject("adodb.recordset")
sql="select * from buyok_orderlist"
rsadd.open sql,conn,1,3
rsadd.AddNew 
rsadd("UserId")=Name
rsadd("OrderNum")=inBillNo
rsadd("RecName")=RecName
rsadd("OrderSum")=Total
rsadd("RecPhone")=RecPhone
rsadd("RecAddress")=RecAddress
rsadd("pei")=pei     '配送方式
rsadd("fei")=fei     '配送费用
rsadd("thiskou")=userkou
rsadd("CompPhone")=CompPhone
rsadd("gettime")=Gettime
rsadd("ZipCode")=ZipCode
rsadd("Recmail")=Recmail
rsadd("Notes")=Notes
rsadd.Update
rsadd.close
set rsadd=nothing
Set rs = conn.Execute("select * from buyok_produc where ProdId in ("&buylist&") order by ProdId")
set rsdetail=server.createobject("adodb.recordset")
sql="select * from buyok_order"
rsdetail.open sql,conn,1,3
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
rsdetail.AddNew 
if Name<>"" then rsdetail("UserId")=Name
rsdetail("OrderNum")=inBillNo
rsdetail("ProdId")=rs("ProdId")
if Quatity="" or Quatity=0 then Quatity=1
rsdetail("ProdUnit")=Quatity
rsdetail("BuyPrice")=rs("PriceList")
rsdetail("pei")=pei
rsdetail("fei")=fei
rsdetail.Update
rs.MoveNext
Wend
rsdetail.close
set rsdetail=nothing
rs.close
set rs=nothing
response.cookies("buyok")("cart")=""
response.cookies("buyok")("total")=""

if pay="1" then
%>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=100%>
<tr><td align="center" valign="middle" height=60><br><br><font color="#FF3333">恭喜，订单提交成功！请记下您的订单号，以便日后查询。<br>您的订单号码是：
<b><%=inBillNo%></b>&nbsp;&nbsp;&nbsp;&nbsp;本次交易金额为：<b><%=total%></b>元</font></td></tr>
<tr><td align="center" valign="middle"  height=60>只有付款成功后，才能完成本次交易。您可选择在线实时支付，或传统的非在线付款方式。</td></tr>
</table>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=450>
<tr><td align=center width=50% height=120>
<form action="http://www.WestPay.com.cn/Pay/WestPayReceiveOrderFromMerchant.asp" method="POST" name="SendOrderToWestPay"  target=new>
<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="submit" name="submit" value="WestPay在线支付">
</form>
</td>
<td align=center  width=50%  height=150>
<form method="post" action="../fukuan.asp" target=new><input type=submit  value="查看其它付款方法"></form>
</td>
</tr>
<tr><td colspan=2 align=center>本站使用西部支付平台，支持国内18家银行60余种银行卡在线实时支付<br><br><a href='http://www.westpay.com.cn'  target="_blank"><img src='../images/pay/westpay.gif' border=0></a>
</td></tr>
</table>
<%
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)))
%>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=100%>
<tr><td align="center" valign="middle" height=60>
<br><br><font color="#FF3333">恭喜，订单提交成功！请记下您的订单号，以便日后查询。<br><br>您的订单号码是：<b><%=inBillNo%></b>&nbsp;&nbsp;&nbsp;&nbsp;本次交易金额为：<b><%=total%></b>元</font> </td></tr>
<tr><td align="center" valign="middle"  height=60>只有付款成功后，才能完成本次交易。您可选择在线实时支付，或传统的非在线付款方式。</td></tr>
</table>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=450>
<tr><td align=center width=50% height=120>
<form method=post action="https://pay.chinabank.com.cn/select_bank" target=new>
<input type=submit name=v_action value="网银在线实时支付">
<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%>">
</form>
</td>
<td align=center  width=50%  height=120>
<form method="post" action="../fukuan.asp" target=new><input type=submit  value="查看其它付款方法"></form>
</td></tr>
<tr><td colspan=2 align=center>本站使用“网银在线安全支付平台”，支持国内绝大多数银行卡在线实时支付<br><br><a href='http://www.chinabank.com.cn/rmb_card/cardtype.shtml'  target="_blank"><img src='../images/pay/chinabank.gif' border=0></a></td></tr>
</table>
<%
elseif pay="3" then
purpose=pay88name&"（订单号："&inBillNo&"）"
%>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=100%>
<tr><td align="center" valign="middle" height=60>
<br><br><font color="#FF3333">恭喜，订单提交成功！请记下您的订单号，以便日后查询。<br><br>您的订单号码是：<b><%=inBillNo%></b>&nbsp;&nbsp;&nbsp;&nbsp;本次交易金额为：<b><%=total%></b>元</font> </td></tr>
<tr><td align="center" valign="middle"  height=60>只有付款成功后，才能完成本次交易。您可选择在线实时支付，或传统的非在线付款方式。</td></tr>
</table>
<!--pay88.com官方正在升级无组件接口，该接口暂时不能使用，本系统暂使用傻瓜型接口-->
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=450>
<tr><td align=center width=50% height=120>
<form method="post" action="https://www.pay88.com/pay.shtml?method=get&userid=<%=pay88id%>&purpose=<%=server.URLEncode(purpose)%>&amount=<%=total%>&mac=none" target=new>
<input type=submit name=action value="PAY88在线支付">
</form>
</td>
<td align=center  width=50%  height=120>
<form method="post" action="../fukuan.asp" target=new><input type=submit  value="查看其它付款方法"></form>
</td></tr>
<tr><td colspan=2 align=center>本站使用“Pay88.com在线支付平台”，支持国内绝大多数银行卡在线实时支付<br><br><a href='http://www.pay88.com'  target="_blank"><img src='../images/pay/pay88.gif' border=0></a></td></tr>
</table>
<%
elseif pay="4" then
%>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=100%>
<tr><td align="center" valign="middle" height=60>
<br><br><font color="#FF3333">恭喜，订单提交成功！请记下您的订单号，以便日后查询。<br><br>您的订单号码是：<b><%=inBillNo%></b>&nbsp;&nbsp;&nbsp;&nbsp;本次交易金额为：<b><%=total%></b>元</font> </td></tr>
<tr><td align="center" valign="middle"  height=60>只有付款成功后，才能完成本次交易。您可选择在线实时支付，或传统的非在线付款方式。</td></tr>
</table>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=450>
<tr><td align=center width=50% height=120>
<form method="post" action="https://payment.nps.cn/pay/PayCar.jsp" target="_blank">
<input Type="hidden" Name="M_ID" value="<%=npsid%>">	
<input Type="hidden" Name="MODate" value="<%=date+time%>">
<input Type="hidden" Name="MOrderID" value="<%=inBillNo%>">
<input Type="hidden" Name="MOAmount" value="<%=replace(total,",","")%>">
<input Type="hidden" Name="MOCurrency" value="1">
<input Type="hidden" name="M_URL" value="null">
<input Type="hidden" Name="M_Language" value="1">
<input Type="hidden" Name="S_Name" value="<%=RecName%>">
<input Type="hidden" Name="S_Address" value="<%=RecAddress%>">
<input Type="hidden" Name="S_PostCode" value="<%=Zipcode%>">
<input Type="hidden" Name="S_Telephone" value="<%=RecPhone%>">
<input Type="hidden" Name="S_Email" value="<%=Recmail%>">
<input Type="hidden" Name="R_Name" value="null">
<input Type="hidden" Name="R_Address" value="null">
<input Type="hidden" Name="R_PostCode" value="null">
<input Type="hidden" Name="R_Telephone" value="null">
<input Type="hidden" Name="R_Email" value="null">
<input Type="hidden" Name="R_Name" value="null">
<input Type="hidden" Name="R_Address" value="null">
<input Type="hidden" Name="R_PostCode" value="null">
<input Type="hidden" Name="R_Telephone" value="null">
<input Type="hidden" Name="R_Email" value="null">
<input Type="hidden" name="MOComment" value="<%=Notes%>">
<input Type="hidden" Name="State" value="0">
<INPUT type=submit name=action value="NPS 在线支付">
</form>
</td>
<td align=center  width=50%  height=120>
<form method="post" action="../fukuan.asp" target=new><input type=submit  value="查看其它付款方法"></form>
</td></tr>
<tr><td colspan=2 align=center>本站使用NPS在线支付平台，支持国内主流银行卡在线实时支付<br><br><a href='http://www.nps.cn'  target="_blank"><img src='../images/pay/nps.gif' border=0></a></td></tr>
</table>
<%
elseif pay="5" then
12 下一页
💿 文件大小 4256 K
👤 上传用户 wuqiweipp
📂 所属分类其他
🏷️ 相关标签

#网站
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -