📄 checklist.asp
字号:
<!--#include file="md5.asp"-->
<!--#include file="conn.asp"-->
<%
if request.cookies("shopzhiwang")("username")="" then
response.write "<script language=javascript>alert('对不起，您还没有登陆！');window.close();</script>"
response.End
end if
dim payid,paypin,payurl
set rs=server.CreateObject("adodb.recordset")
rs.Open "select payid,paypin,payurl from config ",conn,1,3
payid=rs("payid")
paypin=rs("paypin")
payurl=rs("payurl")
rs.close
set rs=nothing
%>
<%
'接收来自上页所有订单信息
v_rcvname=Request.Form("v_rcvname")
v_rcvaddr=Request.Form("shouhuorendizhi")
v_rcvtel=Request.Form("shouhuorendianhua")
v_rcvpost=Request.Form("shouhuorenyoubian")
v_ordername=Request.Form("dinghuorenxingming")
v_amount=Request.Form ("v_amount")
'根据系统时间产生订单，格式：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 = ""&payid&""
key = ""&paypin&""
'以下v_oid为网银推荐标准订单号
v_oid=v_ymd&"-"&v_mid&"-"&BillNo
v_moneytype = "0" '0为rmb 1为dollor
v_orderstatus = "0" '0未配齐 1为配齐
v_url=""&payurl&"/receive.asp?id=" & request.cookies("shopzhiwang")("username") & "" '譬如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>
<table border="0" align=center>
<tr>
<td align="center">请再次确认您的付款信息：<br><br>
<table border="0" width="95%" bgcolor="#f0f0f0">
<tr>
<td width="100">会员号：</td>
<td width="300"><%=v_rcvname%></td>
</tr>
<tr>
<td align="left" width="100">姓 名</td>
<td><%=v_ordername%></td>
</tr>
<tr>
<td align="left" width="100">地 址：</td>
<td><%=v_rcvaddr%></td>
</tr>
<tr>
<td align="left" width="100">电 话：</td>
<td><%=v_rcvtel%></td>
</tr>
<tr>
<td align="left" width="100">邮 编：</td>
<td><%=v_rcvpost%></td>
</tr>
<tr>
<td align="left" width="100"><font color="#FF6600">金 额:</font></td>
<td><font color="#FF6600"><%=v_amount%></font></td>
</tr>
</table>
</td>
</tr>
</table>
<form action="http://pay.chinaebank.cn/md5_select_bank.jsp" method="post" name="E_FORM" target="_blank">
<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>
<table border="0" width="100%">
<tr>
<td align="right">本窗口20秒后自动关闭
</td>
</tr>
</table>
</body>
<script language="Javascript">
function closeinfo(){window.close();}
setTimeout("closeinfo()", 20000);
</script>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -