⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 receive_westpay.asp

📁 是一套很好的数码购物系统
💻 ASP
字号:
<!--#include file="include/buyok_shop_30_conn.asp" -->
<!--#include file="chopchar.asp"-->
<html><head>
<title>在线支付结果-<%=sitename%>-<%=siteurl%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
body  {font-family: "宋体";font-size:15pt;}
</style>
</head>
<body  text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<blockquote>
<%
MerchantOrderNumber=request("MerchantOrderNumber")     '订单号
WestPayOrderNumber=request("WestPayOrderNumber")       '西部支付订单号
PaidAmount=ccur("0"&request("PaidAmount"))             '支付金额
if MerchantOrderNumber="" or WestPayOrderNumber="" or PaidAmount=0 then
response.write "<br><font color=#000000><b>无效提交,或支付不成功!</b></font>"
response.end
else

'以下结果仅供参考,鉴于网络数据传输的可伪造性,因此回传的数据可能有假,请以西部支付后台帐务管理中的数据为准。

	sql="select * from buyok_OrderList where OrderNum='"&MerchantOrderNumber&"'"
	set rs=Server.Createobject("ADODB.RecordSet")
	rs.Open sql,conn,1,3
	if csng(PaidAmount)=csng(rs("ordersum")) then 
	rs("Status")="88" 
	response.write "<br><font color=red size=+5><b>在线支付成功!</b></font>"
	else
	response.write "<br><font color=#000000 size=+5><b>在线支付失败!</b></font>"
	end if
	rs.update
	rs.close
	set rs=nothing

end if%>

<br><br><br><b><font color="RED">提示:</font> 您网上在线支付情况反馈如下:</b>
<br>此次交易订单号:<%=MerchantOrderNumber%>
<br>Westpay订单号:<%=WestPayOrderNumber%>
<br>本交支付金额:<%=PaidAmount%>
<br><br>
<b>如有疑问,请及时与我们联系:</b>
<br><%=adm_kf%><br><br><%=sitename%><br><%=siteurl%>



</blockquote>
</body>
</html>

⌨️ 快捷键说明

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