index.asp

来自「有关遗传算法的例子」· ASP 代码 · 共 88 行

<!--#include file="xpayconfig.asp"-->
<!--#include file="md5.asp"-->
<%
'########################################################################################
'	亚阳软件  http://www.ayang.cn 之
'	易付通网关  网址：http://new.xpay.cn/
'	注意事项：使用此网关前需要先到上面的网址注册开通帐号，
'	开通后请在亚阳后台付费系统参数设置中，填写你的商户号跟密钥即可正常使用本支付网关
'	站长推荐网关，此网关支持在线支付，电话支付等多种比较先进的支付技术
'	技术支持QQ：82895743  Email:[e-mail]
'#######################################################################################
ayangVerifyurl=Request.serverVariables("Http_REFERER")
if instr(ayangVerifyurl,"/member/pay_bank.asp")="0" or session("ayangmoviesystem_pay")<>True then
Response.write "非法或二次提交，请刷新上一个页面再重试一次"
Response.end
end if
session("ayangmoviesystem_pay")=False
Session("ayangmoviesystem_repay")=False

    '订单号
	bid=(hour(now())+54)&(minute(now())+21)&(second(now())+19)
	bid=tid+"-"+bid
	
	'金额
	
	prc=Request.form("zfmoney")
	
	pdt=Request.form("vipname")
	
	if session("username")<>"" then
		r_name	=	session("username")
	else
		r_name	=	Request.form("username")
	end if
	
	'用户,会员级别，级别名
	username=Request.form("username")&"|"&Request.form("vip")&"|"&Request.form("vipname")&"|"&Request.form("select")&"|"&r_name
	remark1=Request.form("select")
	card="bank"
    
    scard=""
    lang="gb2312"

    md=md5(key&":"&prc&","&bid&","&tid&","&card&","&scard&","&actioncode&","&actionparameter&","&ver)
                                                            'md为加密数据，加密顺序必须严格按此顺序
%>

<!--表单确认信息如下-->
<link rel="stylesheet" href="../images/css.css" type="text/css">
<table border="0" cellspacing="0" cellpadding="15" height="75" width="378">
  <tr>
    <td>
      <table width="100%" border="0" cellspacing="1" cellpadding="5" class="b1" bgcolor="#990033">
        <tr> 
          <td width="3%"><img src="../images/wait.gif"></td>
          <td width="97%">正在发送信息到支付网关->><br>
            请放心使用在线支付功能，我们保证你的信息安全 </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<form method="post" action="http://pay.xpay.cn/pay.aspx" name="XpayFORM" target=new>
<input type=HIDDEN name="tid" 	value="<%=tid%>"> 
<input type=HIDDEN name="bid"   value="<%=bid%>">  	
<input type=HIDDEN name="prc"    value="<%=prc%>"> 	
<input type=HIDDEN name="card" value="<%=card%>">  	
<input type=HIDDEN name="scard" value="<%=scard%>" > 
<input type=HIDDEN name="actioncode" value="<%=actioncode%>">  
<input type=HIDDEN name="actionparameter"  value="<%=actionparameter%>"> 
<input type=HIDDEN name="ver"  value="<%=ver%>">   
<input type=HIDDEN name="md"  value="<%=md%>">  
<input type=HIDDEN name="url"  value="<%=url%>">  
<input type=HIDDEN name="pdt"  value="<%=pdt%>">

<input type=HIDDEN name="username"  value="<%=username%>">    
<input type=HIDDEN name="type"  value="<%=pdttype%>">
<input type=HIDDEN name="lang"  value="<%=lang%>">    
<input type=HIDDEN name="remark1"  value="<%=remark1%>">
<input type=HIDDEN name="disableemail"  value="<%=disableemail%>">   
<input type=HIDDEN name="sitename"  value="<%=sitename%>">   
<input type=HIDDEN name="siteurl"  value="<%=siteurl%>">   
</form>
<script language=javascript>
	XpayFORM.submit();
	setTimeout("location.href='../src_4.asp';" , 5000);
</script>