<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> 
<!--#include file="./classes/MediPayRequestHandler.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gbk">
<title>财付通中介担保支付请求示例</title>
</head>
<body>
<%
'---------------------------------------------------------
'财付通中介担保支付请求示例，商户按照此文档进行开发即可
'---------------------------------------------------------

Dim strNow
Dim randNumber

'14位时间（YYYYmmddHHMMss)
strNow = getStrNow()

'4位随机数
randNumber = getStrRandNumber(1000,9999)

Dim key
Dim chnid
Dim seller

'平台商密钥
key = "123456"

'平台商帐号
chnid = "88881481"

'卖家
seller = "88881481"

Dim mch_desc
Dim mch_name
Dim mch_price
Dim mch_returl
Dim mch_vno
Dim show_url
Dim transport_desc
Dim transport_fee

'交易说明
mch_desc = "交易说明"

'商品名称
mch_name = "商品名称"

'商品总价，单位为分
mch_price = "1"

'回调通知URL
mch_returl = "http://localhost/tenpay/mch_returl.asp"

'商家的定单号
mch_vno = strNow & randNumber

'支付后的商户支付结果展示页面
show_url = "http://localhost/tenpay/show_url.asp"

'物流公司或物流方式说明
transport_desc = ""

'需买方另支付的物流费用,以分为单位
transport_fee = ""


'创建支付请求对象
Dim reqHandler
Set reqHandler = new MediPayRequestHandler

'初始化
reqHandler.init()

'设置密钥
reqHandler.setKey(key)

'-----------------------------
'设置支付参数
'-----------------------------
reqHandler.setParameter "chnid", chnid						'平台商帐号
reqHandler.setParameter "encode_type", "1"					'编码类型 1:gbk 2:utf-8
reqHandler.setParameter "mch_desc", mch_desc				'交易说明
reqHandler.setParameter "mch_name", mch_name				'商品名称
reqHandler.setParameter "mch_price", mch_price				'商品总价，单位为分
reqHandler.setParameter "mch_returl", mch_returl			'回调通知URL
reqHandler.setParameter "mch_type", "1"						'交易类型：1、实物交易，2、虚拟交易
reqHandler.setParameter "mch_vno", mch_vno					'商家的定单号
reqHandler.setParameter "need_buyerinfo", "2"				'是否需要在财付通填定物流信息，1：需要，2：不需要。
reqHandler.setParameter "seller", seller					'卖家财付通帐号
reqHandler.setParameter "show_url",	show_url				'支付后的商户支付结果展示页面
reqHandler.setParameter "transport_desc", transport_desc	'物流公司或物流方式说明
reqHandler.setParameter "transport_fee", transport_fee		'需买方另支付的物流费用


'请求的URL
Dim reqUrl
reqUrl = reqHandler.getRequestURL()

'debug信息
'Dim debugInfo
'debugInfo = reqHandler.getDebugInfo()

'Response.Write("<br/>debugInfo:" & debugInfo & "<br/>")

'Response.Write("<br/>reqUrl" & reqUrl & "<br/>")

'reqHandler.doSend()


%>
<br/><a href="<%=reqUrl%>" target="_blank">财付通支付</a>
</body>
</html>