📄 banktransfer_submit.asp
字号:
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/func.asp"-->
<%
FunCode="F105"
session("title")="招行在线支付"
session("headline")="首页 -> 注册系统 -> 招行在线支付"
bankMODE = request("bankMODE")
v_amount=Request.Form ("v_amount")
v_username=session("username")
v_rcvname=rs("chname")
v_rcvaddr=rs("chaddress")
v_rcvtel=rs("telephoneno")
v_rcvpost=rs("postcode")
v_ordername=rs("chname")
%>
<input type="hidden" name="v_md5info" size="100" value="<%=f%>">
<input type="hidden" name="v_mid" value="<%=v_mid%>">
<input type="hidden" name="v_oid" value="<%=v_oid%>">
<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_ymd" value="<%=v_ymd%>">
<input type="hidden" name="v_rcvpost" value="<%=v_rcvpost%>">
<input type="hidden" name="v_amount" value="<%=v_amount%>">
<input type="hidden" name="v_orderstatus" value="<%=v_orderstatus%>">
<input type="hidden" name="v_ordername" value="<%=v_ordername%>">
<input type="hidden" name="v_moneytype" value="<%=v_moneytype%>">
<input type="hidden" name="v_url" value="<%=v_url%>">
<!--#include file="../inc/head2.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from [user] where username='"&session("username")&"'"
rs.open sql,conn,1,1
'接收来自上页所有订单信息
bankMODE = request("bankMODE")
v_amount=Request.Form ("v_amount")
v_username=session("username")
v_rcvname=rs("chname")
v_rcvaddr=rs("chaddress")
v_rcvtel=rs("telephoneno")
v_rcvpost=rs("postcode")
v_ordername=rs("chname")
'根据系统时间产生订单，格式：YYYYMMDD HHMMSS
yy=year(date)
mm=right("00"&month(date),2)
dd=right("00"&day(date),2)
v_ymd=yy&mm&dd
'生成订单号所有所需元素,格式为：小时，分钟，秒
xiaoshi=right("00"&hour(time),2)
fenzhong=right("00"&minute(time),2)
miao=right("00"&second(time),2)
'产生6位订单号BillNo
BillNo=xiaoshi&fenzhong&miao
'定义相关必要参数，如商户号、私钥、推荐的标准形式订单号、币种、配货状态、返回url地址
v_mid = "12283"
key = "chinabank857860585jbvisdfjwois"
'以下v_oid为网银推荐标准订单号
v_oid=v_ymd&"-"&v_mid&"-"&BillNo
v_moneytype = "0" '0为rmb 1为dollor
v_orderstatus = "0" '0未配齐 1为配齐
v_url="http://www.mysoho.com.cn/LQHM/user/UserSelf/chinabank_receive.asp" '譬如http://www.xxx.com/xxx.asp
dim iii,ooo
iii=split(v_amount,".")
if ubound(iii)=0 then
v_amount=cstr(v_amount) & ".00"
else
if len(iii(1))=1 then v_amount=cstr(iii(0)) & "." &cstr(iii(1)) & "0"
if len(iii(1))=2 then v_amount=cstr(v_amount)
if len(iii(1))>2 then v_amount=cstr(iii(0)) & "." & left(iii(1),2)
end if
yy=year(date)
mm=month(now)
if len(mm)=1 then mm="0"&mm
dd=day(Date)
if len(dd)=1 then dd="0"&dd
v_ymd=yy&mm&dd
key_key = v_moneytype+v_ymd+v_amount+v_rcvtel+v_oid+v_mid+v_url+key
'拼凑串里勿使用中文字符，目前MD5在ASP、asp.net、java等环境下对中文处理有偏差现象
f=Ucase(trim(md5(key_key)))
'md5.asp文件中，LCase是将字符转换为小写; Ucase是将字符转换为大写
'网银支付平台对MD5值只认大写字符串，所以小写的MD5值得转换为大写
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
</head>
<body>
<br><br>
<br><br>
<br>
<table border=1 bordercolor=#3770A9 bordercolordark=#ffffff cellpadding=3
cellspacing=0 width=55% class="size09" align="center">
<tr>
<td colspan="2" bgcolor="#efefef" height="28">
<div align="center" class="color01">请您确认转帐信息:</div>
</td>
</tr>
<tbody>
<tr>
<td width="70" height="35">
<div align="center">会员:</div>
</td>
<td
style="LINE-HEIGHT: 14pt" height="35" width="455">
<%=session("username")%>
</td>
</tr>
<tr>
<td width="70" height="35">
<div align="center">金额:</div>
</td>
<td
style="LINE-HEIGHT: 14pt" height="35" width="455">
<%=v_amount%>元
</td>
</tr>
<tr>
<td width="70" height="35">
<div align="center">姓名:</div>
</td>
<td
style="LINE-HEIGHT: 14pt" height="35" width="455">
<%=v_rcvname%>
</td>
</tr>
<tr>
<td width="70" height="35">
<div align="center">地址:</div>
</td>
<td
style="LINE-HEIGHT: 14pt" height="35" width="455">
<%=v_rcvaddr%>
</td>
</tr>
<tr>
<td width="70" height="35">
<div align="center">电话:</div>
</td>
<td
style="LINE-HEIGHT: 14pt" height="35" width="455">
<%=v_rcvtel%>
</td>
</tr>
<tr>
<td width="70" height="35">
<div align="center">邮编：</div>
</td>
<td
style="LINE-HEIGHT: 14pt" height="35" width="455">
<%=v_rcvpost%>
</td>
</tr>
<tr>
<td colspan="2" bgcolor="#efefef">
<div align="center">
<% if bankMODE = 1 then%>
<form method="post" action="https://www.nj.cmbchina.com/netpayment/BaseHttp.dll?PrePay1?CoNo=000001&Date=<%=v_ymd%>&MerchantUrl=<%=v_url%>&BillNo=<%=v_oid%>&Amount=<%=v_amount%>" name="E_FORM" target=new>
<center>
<input type=submit name=v_action value="招行网上安全支付平台">
<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Sub button1_onclick
window.history.back
End Sub
-->
</SCRIPT>
<input type="button" name="button1" id="button1" value="返回">
</center>
<input type="hidden" name="v_md5info" size="100" value="<%=f%>">
<input type="hidden" name="v_mid" value="<%=v_mid%>">
<input type="hidden" name="v_oid" value="<%=v_oid%>">
<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_ymd" value="<%=v_ymd%>">
<input type="hidden" name="v_rcvpost" value="<%=v_rcvpost%>">
<input type="hidden" name="v_amount" value="<%=v_amount%>">
<input type="hidden" name="v_orderstatus" value="<%=v_orderstatus%>">
<input type="hidden" name="v_ordername" value="<%=v_ordername%>">
<input type="hidden" name="v_moneytype" value="<%=v_moneytype%>">
<input type="hidden" name="v_url" value="<%=v_url%>">
</form>
<% else %>
<form method="post" action="https://pay.chinaebank.cn/select_bank.jsp" name="E_FORM" target=new>
<center>
<input type=submit name=v_action value="网银电子商城网上安全支付平台">
<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Sub button1_onclick
window.history.back
End Sub
-->
</SCRIPT>
<input type="button" name="button1" id="button1" value="返回">
</center>
<input type="hidden" name="v_md5info" size="100" value="<%=f%>">
<input type="hidden" name="v_mid" value="<%=v_mid%>">
<input type="hidden" name="v_oid" value="<%=v_oid%>">
<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_ymd" value="<%=v_ymd%>">
<input type="hidden" name="v_rcvpost" value="<%=v_rcvpost%>">
<input type="hidden" name="v_amount" value="<%=v_amount%>">
<input type="hidden" name="v_orderstatus" value="<%=v_orderstatus%>">
<input type="hidden" name="v_ordername" value="<%=v_ordername%>">
<input type="hidden" name="v_moneytype" value="<%=v_moneytype%>">
<input type="hidden" name="v_url" value="<%=v_url%>">
</form>
<%end if %>
</div>
</td>
</tr>
</tbody>
</table>
<!--#include file="../inc/bottom2.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -