当前位置：清风网络学院 → 网站建设 → 源码精华 → 惊云高级会员网银在线支付接口程序


	精品推荐


特别推荐

·几种媒体文件(MediaPlayer,Realplay,QuickTime)的代码


热点TOP10

·Web 2.0视觉风格进化论(2):视觉风格面面观

·动态提示的下拉框

·PHP/MySQL Search Engine script

·网页中的多媒体播放控制

惊云高级会员网银在线支付接口程序

日期：2008年6月12日作者：查看:[大字体中字体小字体]

所有文件放入admin目录中

send.asp文件

<%
user=Request.cookies("JyDownUserName")
if user<>"" then
user=replace(user," ","+++ close")
else
response.write("<li>您没有进入本页面的权限,本次操作已被记录!<br><li>如果你是本站会员请先<a href=login.asp target=_top>登陆</a>后进入.")
response.end
end if
server_vv=len(Request.ServerVariables("SERVER_NAME"))
server_v1=left(Cstr(Request.ServerVariables("HTTP_REFERER")),server_vv)
server_v2=left(Cstr("http://"&Request.ServerVariables("SERVER_NAME")),server_vv)
if server_v1<>server_v2 and server_v1<>"" and server_v2<>"" then
response.write("<script>alert('错误：禁止从站点外部提交数据!.')</script>")
response.end
end if
%>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from UserInfo where user='"&JyDownAdminName&"'",conn,1,1
email=rs("email")
tel=rs("oicq")
%>
<%

' 表单的各项参数如下：

' v_mid
' 商户号,这里为测试商户号1001，替换为自己的商户号即可
' key
' MD5私钥
' v_oid
' 订单号，构成格式年月日-商户号-小时分钟秒
' v_amount
' 订单金额
' v_moneytype
' 支付币种0为人民币
' v_url
' 商户自定义返回接收支付结果的页面
' remark1
' 备注字段1
' remark2
' 备注字段2
' style
' 指网关模式0(普通)，1(银行列表中带外卡)

'********以下几项与网上支付货款无关，建议不用**************
' v_rcvname
' 收货人
' v_rcvaddr
' 收货地址
' v_rcvtel
' 订货人电话
' v_rcvpost
' 邮编
' v_ordername
' 发货人
' v_orderemail
' 订货人EMAIL

key = "test" '这里添上你chianbank的KEY
v_mid = "10001" '这里添上你的商户号
v_amount="0.01" '价格
v_moneytype = "0"
style="0"
v_url="http://www.域名.com/admin/Receive.asp"
remark1="VIP费"
remark2=""

'根据系统时间产生订单，格式：YYYYMMDD-v_mid-HMMSS
curdate=now()
v_oid=year(curdate)&month(curdate)&day(curdate)&"-"&v_mid&"-"&hour(curdate)&minute(curdate)&second(curdate)
text = v_amount&v_moneytype&v_oid&v_mid&v_url&key
v_md5info=Ucase(trim(md5(text))) '网银支付平台对MD5值只认大写字符串，所以小写的MD5值得转换为大写

'**********以下几项与网上支付货款无关，建议不用**************
v_rcvname=JyDownAdminName
v_rcvaddr=""
v_rcvtel=tel
v_rcvpost=""
v_ordername=""
v_orderemail =email
%>


<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>在线支付接口ASP版</title>
</head>

<body>

<br>
<table border="0" width="80%" align=center>
<tr>
<td width="100%">请您确认信息:<br>
<table border="0" width="80%">
<tr>
<td align="left" width="20%">会员ID：</td>
<td><%=v_rcvname%></td>
</tr>
<tr>
<td align="left" width="20%">会员QQ：</td>
<td><%=v_rcvtel%></td>
</tr>
<tr>
<td align="left" width="20%">会员EMAIL：</td>
<td><%=v_orderemail%></td>
</tr>
</table>
<br>
<a href="edit.asp">修改联系方法</a></td>
</tr>
<tr>
<td><br>
您付款总金额为:<font color=red><%=v_amount%><br>
</font><br>
如果以上资料正确，请您开始下一步操作,注意浏览器不要禁用cookies。</td>
</tr>
</table>
<form method="post" action="https://pay.chinabank.com.cn/select_bank" name="E_FORM" target=new>

<div 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="style" value="<%=style%>">
<input type="hidden" name="remark1" value="<%=remark1%>">
<input type="hidden" name="remark2" value="<%=remark2%>">


<input type="hidden" name="v_rcvname" value="<%=v_rcvname%>">
<input type="hidden" name="v_rcvaddr" value="<%=v_rcvaddr%>">
<input type="hidden" name="v_rcvtel" value="<%=v_rcvtel%>">
<input type="hidden" name="v_rcvpost" value="<%=v_rcvpost%>">
<input type="hidden" name="v_ordername" value="<%=v_ordername%>">
<input type="hidden" name="v_orderemail" value="<%=v_orderemail%>">

<input type=submit name=v_action value="在线支付立即开通">
</div>
</form>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><a href="pay.htm" target="_blank">其他付费方式</a></td>
</tr>
</table>
</body>
</html>

Receive.asp文件

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">

</style>
</head>
<body>





<%
user=Request.cookies("JyDownUserName")
if user<>"" then
user=replace(user," ","+++ close")
else
response.Write "user错误！"
response.End()
end if
%>

<%
' 提取表单参数
'
' v_oid
' 商户发送的v_oid定单编号
' v_pmode
' 支付方式（字符串）
' v_pstatus
' 支付状态
' 20（支付成功）
' 30（支付失败）
' v_pstring
' 支付结果信息
' 支付完成（当v_pstatus=20时）；
' 失败原因（当v_pstatus=30时）；
' v_md5str
' Md5校验串
' v_amount
' 订单实际支付金额
' v_moneytype
' 订单实际支付币种
' remark1
' 备注字段1
' remark2
' 备注字段2
' key
' 私钥值，商户可上chinabank后台自行设定
'
'/
v_oid=request("v_oid")
v_pmode=request("v_pmode")
v_pstatus=request("v_pstatus")
v_pstring=request("v_pstring")
v_amount=request("v_amount")
v_moneytype=request("v_moneytype")
remark1=request("remark1")
remark2=request("remark2")
v_md5str=request("v_md5str")

key="test" '这里添你的chinabank key

if request("v_md5str")="" then
response.Write("v_md5str：空值")
response.end
end if

'md5校验

text = v_oid&v_pstatus&v_amount&v_moneytype&key
md5text = Ucase(trim(md5(text)))

'按md5检验情况输出结果 Ucase转换为大写
if md5text<>v_md5str then
response.write("MD5 error")
else
'逻辑处理
if v_pstatus=20 then
'支付成功
set rs=server.CreateObject("ADODB.RecordSet")
rs.open "select * from UserInfo where user='"&user&"'",conn,1,2
rs("dj")=1
rs.Update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.Write("VIP开通成功")
else
'支付失败
response.Write("支付出现问题，未扣除您的金额")
end if

'提示：仅是对校验码校验通过不表示该支付结果是成功只意味着该信息是由网银传回
'校验成功需对传回的v_pstatus参数做判断，其中20都意味着支付成功，30表示支付失败
'如果商户涉及实时售卡，请对返回的金额与数据库中原始金额做大小判断，以防恶意行为

'-----------------------------------------------
end if
%>


<table width="60%" border="0" align="center">
<tr>
<td> <p><b><font color="#FF0000">提示：</font> 您网上在线支付情况反馈如下：</b><br>
此次交易编号： <%=v_oid%></p>
<p>
<%if v_pstatus=20 then
zhuangtai = "在线支付已经支付成功"
%>
在线支付已经支付成功
。
<%elseif v_pstatus=30 then
zhuangtai = "在线支付失败!"
%>
在线支付失败! 支付中途出现问题，未扣除您的金额"
<%end if%>
<br>
<br>
<br>
您所使用的卡为：<%=v_pmode%><br>
订单实际支付金额：<%=v_amount%><br>
</p> </td>
</tr>
</table>

MD5.asp 文件自己到 chianbank下载吧

（出处：清风网络学院）

上一篇:QQ2005 Beta2泄漏版火热试用

下一篇:国人投资CN域名兴致盎然如何起个值钱域名

	\| 帮助(？) \| 版权声明 \| 友情连接 \| 关于我们 \| 信息发布
Copyright 2007 www.viphot.com All Rights Reserved.	鄂ICP备05000083号Powered by:viphot