ordersent.asp

这是一个很漂亮的网站购物系统

%>
<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">恭喜，订单提交成功！您的站内订单号是：<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="https://www.ips.net.cn/ipay/ipayment.asp" METHOD=POST name="frm1" target=new>
<input type="hidden" name="mer_code" size="16" value="<%=ipsid%>">
<input type="hidden" name="billNo" size="16" value="<%=ipsid&right(inBillNo,6)%>">
<input type="hidden" name="amount" size="16" value="<%=total%>">
<input type="hidden" name="date" size="16" value="<%=year(now())&right("0"&month(now()),2)&right("0"&day(now()),2)%>">
<input type="hidden" name="merchanturl" value="<%=ipsback%>">
<input type="submit" value="上海环讯IPS在线支付" name="B1">
</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>本站使用上海环讯IPS在线支付平台，支持国内主流银行卡在线实时支付<br><br><a href='http://www.nps.cn'  target="_blank"><img src='../images/pay/ips.gif' border=0></a></td></tr>
</table>
<%
elseif pay="6" 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 action="https://www.paypal.com/cgi-bin/webscr" method="post" target=new>
<input type="hidden" name="cmd" value="_xclick">
<input type="hidden" name="business" value="<%=paypalid%>">
<input type="hidden" name="item_name" value="<%=sitename%>(Ordernumber:<%=inBillNo%>)">
<input type="hidden" name="amount" value="<%=total%>">
<input type="hidden" name="item_number" value="<%=inBillNo%>">
<input type="hidden" name="currency_code" value="CNY">
<input type=submit name=action value="PayPal在线支付">
</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>本站使用PayPal国际支付平台，安全、方便、实时支付<br><br><a href='http://www.paypal.com'  target="_blank"><img src='../images/pay/paypal.gif' border=0></a></td></tr>
</table>
<%
elseif pay="7" then

'支付宝2.0
	'支付宝不允许金额中带,号，因此先用replace替换金额中的,号

	alipay_name=inBillNo & "号订单在线支付"
	alipay_body="以下金额（"& total & "元）已包含配送费用"

	total        =        replace(cstr(formatnumber(total,2)),",","")
        s1           =        "0001"		'命令码
        s2           =        alipay_name	'商品名称
        s21          =        alipay_body	'商品描述
        s3           =        inBillNo		'订单号
        s4           =        total		'金额
        s5           =        "1"		'支付类型
        s6           =        "1"		'购买数量
        s7           =        "1"		'发货方式
        s8           =        "0.00"        	'邮费
        s9           =        "0.00"        	'邮费
        s10          =        "true"        	'只读
        s11          =        notes		'买家留言
        s12          =        ""		'买家Email
        s13          =        ucase(RecName)	'买家姓名
        s14          =        RecAddress	'买家地址
        s15          =        Zipcode		'买家邮编
        s16          =        RecPhone		'买家电话
        s17          =        CompPhone		'买家手机
        sellerEmail  =        alipay_id		'卖家EMAIL
        key          =        alipay_securityCode
	str2CreateAc = "cmd" & s1 & "subject" & s2
	str2CreateAc = str2CreateAc & "body" & s21
	str2CreateAc = str2CreateAc & "order_no" & s3
	str2CreateAc = str2CreateAc & "price" & s4
	str2CreateAc = str2CreateAc & "type" & s5
	str2CreateAc = str2CreateAc & "number" & s6
	str2CreateAc = str2CreateAc & "transport" & s7
	str2CreateAc = str2CreateAc & "ordinary_fee" & s8
	str2CreateAc = str2CreateAc & "express_fee" & s9
	str2CreateAc = str2CreateAc & "readonly" & s10
	str2CreateAc = str2CreateAc & "buyer_msg" & s11
	str2CreateAc = str2CreateAc & "seller" & sellerEmail
	str2CreateAc = str2CreateAc & "buyer" & s12
	str2CreateAc = str2CreateAc & "buyer_name" & s13
	str2CreateAc = str2CreateAc & "buyer_address" & s14
	str2CreateAc = str2CreateAc & "buyer_zipcode" & s15
	str2CreateAc = str2CreateAc & "buyer_tel" & s16
	str2CreateAc = str2CreateAc & "buyer_mobile" & s17
	str2CreateAc = str2CreateAc & key
	itemURL = "https://www.alipay.com/payto:" & sellerEmail & "?cmd=" & s1
	itemURL = itemURL & "&subject=" & Server.URLEncode(s2)
	itemURL = itemURL & "&body=" & Server.URLEncode(s21)
	itemURL = itemURL & "&order_no=" & s3
	itemURL = itemURL & "&price=" & s4
	itemURL = itemURL & "&type=" & s5
	itemURL = itemURL & "&number=" & s6
	itemURL = itemURL & "&transport=" & s7
	itemURL = itemURL & "&ordinary_fee=" & s8
	itemURL = itemURL & "&express_fee=" & s9
	itemURL = itemURL & "&readonly=" & s10
	itemURL = itemURL & "&buyer_msg=" & s11
	itemURL = itemURL & "&buyer=" & s12
	itemURL = itemURL & "&buyer_name=" & s13
	itemURL = itemURL & "&buyer_address=" & s14
	itemURL = itemURL & "&buyer_zipcode=" & s15
	itemURL = itemURL & "&buyer_tel=" & s16
	itemURL = itemURL & "&buyer_mobile=" & s17
	itemURL = itemURL & "&ac=" & MD5(str2CreateAc)
%>

<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=<%=itemURL%> target=new><input type=submit  value="使用“支付宝”付款"></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.alipay.com'  target="_blank"><img src='../images/pay/alipay.gif' border=0></a></td></tr>
</table>


<%
elseif pay="8" then

tid=xpay_tid
key=xpay_key
actioncode="sell"     '交易码,用于标识交易
actionParameter=""    '当 actioncode="sell" ,此参数为空
ver="2.0"             '版本号,当前系统请使用2.0
prc=replace(cstr(formatnumber(total,2)),",","")
bid=inBillNo
card="bank"
scard="bank,unicom,xpay,ebilling"
username=RecName
pdt=xpay_name
pdttype=""
lang="gb2312"
remark1=notes
url=xpay_url
md=md5(key&":"&prc&","&bid&","&tid&","&card&","&scard&","&actioncode&","&actionparameter&","&ver)
%>

<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="get" name="xpaypay" action="http://pay.xpay.cn/Pay.aspx"  target=new>
<input type=HIDDEN name="prc"    value="<%=prc%>"> 	
<input type=HIDDEN name="bid"   value="<%=bid%>"> 
<input type=HIDDEN name="tid" 	value="<%=tid%>">  	
<input type=HIDDEN name="card" value="<%=card%>">  	
<input type=HIDDEN name="scard" value="<%=scard%>" > 
<input type=HIDDEN name="actioncode" value="<%=actioncode%>">  
<input type=HIDDEN name="actionparameter"  value="<%=actionparameter%>"> 	
<input type=HIDDEN name="ver"  value="<%=ver%>">   
<input type=HIDDEN name="md"  value="<%=md%>">    
<input type=HIDDEN name="username"  value="<%=username%>">    
<input type=HIDDEN name="pdt"  value="<%=server.urlencode(pdt)%>">
<input type=HIDDEN name="type"  value="<%=server.urlencode(pdttype)%>">
<input type=HIDDEN name="lang"  value="<%=lang%>">    
<input type=HIDDEN name="remark1"  value="<%=remark1%>">    
<input type=HIDDEN name="url"  value="<%=url%>">    
<input type="submit" value="Xpay在线支付" name="submit">
</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.xpay.cn'  target="_blank"><img src='../images/pay/xpay.gif' border=0></a></td></tr>
</table>

<%
else
%>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=100%>
<tr><td align="center" valign="middle" height=60>
<br><br>恭喜，订单提交成功！请记下您的订单号，以便日后查询。<br><br>您的订单号码是：<b><%=inBillNo%></b>&nbsp;&nbsp;&nbsp;&nbsp;本次交易金额为：<b><%=total%></b>元</td></tr>
<tr><td align="center" valign="middle"  height=60>只有付款成功后，才能完成本次交易。您可通过邮局、银行柜台或网上银行办理付款。<br>我们在确认收到您的款项后，会按您的订单中填写的资料给您发货。</td></tr>
</table>
<table border="0" cellspacing="1" cellpadding="0" align="center" valign=absmiddle width=450>
<tr><td align=center  width=50%  height=150>
<form method="post" action="../fukuan.asp" target=new><input type=submit  value="查看付款方法"></form></td>
<td align=center  width=50%  height=150>
<form method="post" action="../main.asp" target=new><input type=submit  value="返回网站首页"></form>
</td></tr>
<tr><td align=center colspan=2>付款后请尽快与我们联系，以便我们及时查帐并为您发货。<br></td></tr>
</table>
<%
end if
Set rs = conn.Execute("select * from shopsetup") 
jmail=rs("jmail")
adm_mail=rs("adm_mail")
mailyesorno=rs("mailyesorno")
mailserver=rs("mailserver")
mailname=rs("mailname")
mailpassword=rs("mailpassword")
rs.close
set rs=nothing
if mailyesorno=1 then
dim msg
CLStr=Chr(13) & Chr(10)
if jmail=0 then
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.To = adm_mail
objMail.From =mailname
objMail.Subject ="订单通知("&inBillNo&")"
objMail.Body = Name&"("&RecName&")在"&sitename&"("&siteurl&")提交新订单，订单号："&inBillNo&"，订单金额："&Total
objMail.Send
Set objMail = Nothing
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.To = Recmail
objMail.From =mailname
objMail.Subject ="订单通知("&inBillNo&")"
objMail.Body = Name&"("&RecName&")在"&sitename&"("&siteurl&")提交新订单，订单号："&inBillNo&"，订单金额："&Total
objMail.Send
Set objMail = Nothing
else
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = mailname
msg.MailServerPassword = mailpassword   
msg.From = mailname
msg.FromName = sitename
msg.AddRecipient adm_mail
msg.Subject = "飞来一张新订单("&inBillNo&")"
msg.Body = Name&"("&RecName&")在"&sitename&"("&siteurl&")提交新订单，订单号："&inBillNo&"，订单金额："&Total
msg.Send (mailserver)
msg.close
set msg = nothing
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = mailname
msg.MailServerPassword = mailpassword   
msg.From = mailname
msg.FromName = sitename
msg.AddRecipient Recmail
msg.Subject = "订单通知("&inBillNo&")"
msg.Body = Name&"("&RecName&")在"&sitename&"("&siteurl&")提交新订单，订单号："&inBillNo&"，订单金额："&Total
msg.Send (mailserver)
msg.close
set msg = nothing
end if
end if
conn.close
set conn=nothing
%>
</body></HTML>
<!--
★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
★                                                                  ★
☆ （请保留此处版权信息，这些内容并不会对您的网站运行有任何影响）   ☆
★                                                                  ★
☆                良精网店系统-白金版                              ☆
★                                                                  ★
☆  版权所有: 北京良精软件科技有限公司                              ☆
★                                                                  ★
☆  程序开发: 北京良精软件科技有限公司                              ☆
★            MSN:[e-mail] [e-mail]         ★
☆            Tel:[phone]    销售QQ:88353022 技术QQ:812256     ☆
★                                                                  ★
☆  相关网址:http://www.liangjing.net                               ☆
★                                                                  ★
☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
-->