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

📄 replay.asp

📁 使用Asp+Access+FSO+Jmail+Servu开发
💻 ASP
字号:
<!--#include file="md5.asp"-->
<!--#include file="xpayconfig.asp"-->
<!--#include file="../inc/conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>+++商户网站接收支付结果程序</title>
<style type="text/css">
<!--
TD {FONT-SIZE: 9pt}
SELECT {FONT-SIZE: 9pt}
OPTION {COLOR: #5040aa; FONT-SIZE: 9pt}
INPUT {FONT-SIZE: 9pt}
-->
</style>
</head>
<body >
<%  

    tid=Request("tid")                            '商户唯一交易号 
    bid=Request("bid")                            '商户网站订单号
    sid=Request("sid")                            '易付通交易成功 流水号
    prc=Request("prc")                            '支付的金额
    actionCode=Request("actionCode")              '交易码
    actionParameter=Request("actionParameter")    '业务代码
    card=Request("card")                          '支付方式
    success=Request("success")                    '成功标志,
   bankcode=request("bankcode")                   '支付银行代码
   remark1=request("remark1")                     '备注信息
   username=request("username")                   '商户网站支付用户
   md=Request("md")                               '32位md5加密数据
     
   if success="false" then
   response.write "支付失败!"
   response.end
   end if
   
'验证数据是否正确  
'在xpayconfig.asp里取出key的值
'接收页面进行数据加密
dim ymd
ymd=md5(key&":"&bid&","&sid&","&prc&","&actionCode&","&actionParameter&","&tid&","&card&","&success)  
     if  md<>ymd  then               '验证数据是否正确
           response.write "交易失败,数据验证错误!"
           response.end
     else
     '------
     '-----商户可以在这里加入别的代码,例如更新定单成功标志、数据库的操作等
     '-----在此过程中做支付金额判断,看接收过来的金额prc和你数据记录的定单金额是否相等
     '---------


response.write " <a href=index.asp>交易成功,点击可以继续购买</a>"
set rspay=server.createobject("adodb.recordset")
sqlpay="select * from [user] where username='"&Request.Cookies("username")&"'"
rspay.open sqlpay,conn,1,3
rspay("money")=rspay("money")+cint(prc)
rspay.update
rspay.close
set rspay=nothing
end if 
%> 
<br>
<!--
以下是打印出所有接收数据的结果,供编程人员参考
-->
<table width="550" border="0" align="center" cellpadding="4" cellspacing="0">
  <tr> 
    <td> <br><p><b><font color="#FF0000">提示:</font> 您网上在线支付情况反馈如下:</b><br>
        此次交易定单号: <%=bid%></p>
      <p> 
        <%if success="true" then
								zhuangtai = "在线支付已经支付成功"
								%>
        在线支付已经支付成功 
        <%elseif success="false" then
								zhuangtai = "在线支付失败!"
								%>
        在线支付失败! 
        <%end if%>
      </p>
            <p> 支付金额:<%=prc%><br>
    </p>
      <p> 支付成功标致:<%=success%><br>
        <br>
        在线支付方式:<%=card%> </p>
      <p> 银行代码:<%=bankcode%></p>
      <p>传输来的校验码:<%=md%></p>

      <p>加密后的值:<%=ymd%><br>
          <br>
        备注信息:<%=remark1%> 
      </p>

      </p></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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