|
<%
if checkstr(request("cmd"),2)="add" then
if errinfo<>"" then
response.Write errinfo&" —> [返回]"
else
if checkstr(request("cataid"),2)="cardpay" then
merchantAcctId="1001777289301" '人民币网关账户号，用户编号后加01即为人民币网关账户号。
key="D6YKN2W8D4F3BA24" '人民币网关密钥
bgUrl="http://www.edu24ol.com/netbank/99bill_xyk.asp"
payType="15" '支付方式.固定选择值''只能选择00、10、11、12、13、14''00：组合支付（网关支付页面显示快钱支持的各种支付方式，推荐使用）10：银行卡支付（网关支付页面只显示银行卡支付）.11：电话银行支付（网关支付页面只显示电话支付）.12：快钱账户支付（网关支付页面只显示快钱账户支付）.13：线下支付（网关支付页面只显示线下支付方式）.14：B2B支付（网关支付页面只显示B2B支付，但需要向快钱申请开通才能使用）
else
merchantAcctId="1001515606701" '人民币网关账户号，用户编号后加01即为人民币网关账户号。
key="FRYAA978MH3GAUU5" '人民币网关密钥
bgUrl="http://www.edu24ol.com/netbank/99bill.asp"
payType="00" '支付方式.固定选择值''只能选择00、10、11、12、13、14''00：组合支付（网关支付页面显示快钱支持的各种支付方式，推荐使用）10：银行卡支付（网关支付页面只显示银行卡支付）.11：电话银行支付（网关支付页面只显示电话支付）.12：快钱账户支付（网关支付页面只显示快钱账户支付）.13：线下支付（网关支付页面只显示线下支付方式）.14：B2B支付（网关支付页面只显示B2B支付，但需要向快钱申请开通才能使用）
end if
inputCharset="3" '字符集.固定选择值。可为空。1代表UTF-8; 2代表GBK; 3代表gb2312，默认值为1
pageUrl=""
version="v2.0" '网关版本.固定值，快钱会根据版本号来调用对应的接口处理程序。本代码版本号固定为v2.0
language="1" '语言种类.固定选择值。只能选择1、2、3，1代表中文；2代表英文；默认值为1
signType="1" '签名类型.固定值，1代表MD5签名，当前版本固定为1
payerName=username '支付人姓名，可为中文或英文字符
payerContactType="1" '支付人联系方式类型.固定选择值，只能选择1，1代表Email
payerContact="" '支付人联系方式，只能选择Email或手机号
orderId=Order_Code '商户订单号，由字母、数字、或[-][_]组成
orderAmount=Amount*100 '订单金额，以分为单位，必须是整型数字，比方2，代表0.02元
orderTime=getDateStr() '订单提交时间，如：20080101010101
productName="0" '商品名称，可为中文或英文字符
productNum="1" '商品数量，可为空，非空时必须为数字
productId="0" '商品代码，可为字符或者数字
productDesc="" '商品描述
ext1="" '扩展字段1''在支付结束后原样返回给商户
ext2="" '扩展字段2''在支付结束后原样返回给商户
bankId="" '银行代码''实现直接跳转到银行页面去支付,只在payType=10时才需设置参数''具体代码参见 接口文档银行代码列表
redoFlag="0" '同一订单禁止重复提交标志''固定选择值： 1、0''1代表同一订单号只允许提交1次；0表示同一订单号在没有支付成功的前提下可重复提交多次。默认为0建议实物购物车结算类商户采用0；虚拟产品类商户采用1
pid="" '快钱的合作伙伴的账户号 ''如未和快钱签订代理合作协议，不需要填写本参数
'生成加密签名串，请务必按照如下顺序和规则组成加密串！
signMsgVal=appendParam(signMsgVal,"inputCharset",inputCharset)
signMsgVal=appendParam(signMsgVal,"pageUrl",pageUrl)
signMsgVal=appendParam(signMsgVal,"bgUrl",bgUrl)
signMsgVal=appendParam(signMsgVal,"version",version)
signMsgVal=appendParam(signMsgVal,"language",language)
signMsgVal=appendParam(signMsgVal,"signType",signType)
signMsgVal=appendParam(signMsgVal,"merchantAcctId",merchantAcctId)
signMsgVal=appendParam(signMsgVal,"payerName",payerName)
signMsgVal=appendParam(signMsgVal,"payerContactType",payerContactType)
signMsgVal=appendParam(signMsgVal,"payerContact",payerContact)
signMsgVal=appendParam(signMsgVal,"orderId",orderId)
signMsgVal=appendParam(signMsgVal,"orderAmount",orderAmount)
signMsgVal=appendParam(signMsgVal,"orderTime",orderTime)
signMsgVal=appendParam(signMsgVal,"productName",productName)
signMsgVal=appendParam(signMsgVal,"productNum",productNum)
signMsgVal=appendParam(signMsgVal,"productId",productId)
signMsgVal=appendParam(signMsgVal,"productDesc",productDesc)
signMsgVal=appendParam(signMsgVal,"ext1",ext1)
signMsgVal=appendParam(signMsgVal,"ext2",ext2)
signMsgVal=appendParam(signMsgVal,"payType",payType)
signMsgVal=appendParam(signMsgVal,"bankId",bankId)
signMsgVal=appendParam(signMsgVal,"redoFlag",redoFlag)
signMsgVal=appendParam(signMsgVal,"pid",pid)
signMsgVal=appendParam(signMsgVal,"key",key)
signMsg= Ucase(md5(signMsgVal))
'结束快钱参数获取
'功能函数。将变量值不为空的参数组成字符串
Function appendParam(returnStr,paramId,paramValue)
If returnStr <> "" Then
If paramValue <> "" then
returnStr=returnStr&"&"¶mId&"="¶mValue
End if
Else
If paramValue <> "" then
returnStr=paramId&"="¶mValue
End if
End if
appendParam=ReturnStr
End Function
'功能函数。将变量值不为空的参数组成字符串。结束
'功能函数。获取14位的日期
Function getDateStr()
dim dateStr1,dateStr2,strTemp
dateStr1=split(cstr(formatdatetime(now(),2)),"-")
dateStr2=split(cstr(formatdatetime(now(),3)),":")
for each StrTemp in dateStr1
if len(StrTemp)<2 then
getDateStr=getDateStr & "0" & strTemp
else
getDateStr=getDateStr & strTemp
end if
next
for each StrTemp in dateStr2
if len(StrTemp)<2 then
getDateStr=getDateStr & "0" & strTemp
else
getDateStr=getDateStr & strTemp
end if
next
End function
'功能函数。获取14位的日期。结束
%>
<%
end if
else
%>
<%end if%> |
欢迎来到环球网校！
·已经在环球网校注册和报名了的用户,请在左侧输入"用户名"和要"支付的金额"，提交后确认订单，记住自己的订单号，并根据页面提示点击"在钱支付"进入快钱支付平台。
·用户选择快钱账户或者其它银行卡进行在线支付。
·如果您是还没有注册请先点左侧新用户注册按钮成为网校用户。 |
