<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="tenpay_config.asp"-->
<!--#include file="./classes/PayResponseHandler.asp"-->
<!--#include file="./util/tenpay_util.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<%
'---------------------------------------------------------
'财付通双接口处理回调示例，商户按照此示例进行开发即可
'---------------------------------------------------------

log_result("进入前台通知页面！！！！！")


'创建支付应答对象
Dim resHandler
Set resHandler = new PayResponseHandler
resHandler.setKey(key)

'判断签名
If resHandler.isTenpaySign() = True Then

	Dim notify_id
	Dim transaction_id
	Dim total_fee
	Dim out_trade_no
	Dim discount
	Dim trade_state

	 '通知id
	 notify_id = resHandler.getParameter("notify_id")

	'商户交易单号
	out_trade_no = resHandler.getParameter("out_trade_no")	

	'财付通交易单号
	transaction_id = resHandler.getParameter("transaction_id")

	'商品金额,以分为单位
	total_fee = resHandler.getParameter("total_fee")
	
	'如果有使用折扣券，discount有值，total_fee+discount=原请求的total_fee
	discount = resHandler.getParameter("discount")
	
	'支付结果
	trade_state = resHandler.getParameter("trade_state")
	
	'交易模式，1即时到账，2中介担保
	trade_mode = resHandler.getParameter("trade_mode")
	'可获取的其他参数还有
	'bank_type			银行类型,默认：BL
	'fee_type			现金支付币种,目前只支持人民币,默认值是1-人民币
	'input_charset		字符编码,取值：GBK、UTF-8，默认：GBK。
	'partner			商户号,由财付通统一分配的10位正整数(120XXXXXXX)号
	'product_fee		物品费用，单位分。如果有值，必须保证transport_fee + product_fee=total_fee
	'sign_type			签名类型，取值：MD5、RSA，默认：MD5
	'time_end			支付完成时间
	'transport_fee		物流费用，单位分，默认0。如果有值，必须保证transport_fee +  product_fee = total_fee
	If "1" = trade_mode Then '即时到帐
		If "0" = trade_state Then
	
	
	
	
	
			log_result("即时到账前台通知成功")
			Response.Write("Success")'即时到帐支付成功
			Response.Write("<br>订单"&out_trade_no&"即时到帐付款成功，我们会尽快处理订单业务，谢谢合作！")'即时到帐支付成功
	    '处理成功
		Else  
			log_result("即时到账前台通知失败")
			Response.Write("即时到帐支付失败trade_state=" & trade_state)'
		End If
	Else
		If "2"= trade_mode  Then    ' 中介担保 
			If  "0"= trade_state  Then
		
		
		
		
				log_result("中介担保前台通知成功")
				Response.Write("Success")'中介担保支付成功
				Response.Write("<br>订单"&out_trade_no&"中介担保付款成功，我们会尽快处理订单业务，请及时确认付款，谢谢合作！")'支付成功"trade_state=" + trade_state
			Else 
				log_result("中介担保前台通知失败，trade_state=" & trade_state)
				Response.Write("中介担保支付失败trade_state=" & trade_state)

	    	End if
	    End If
    End If
Else'签名失败
	Response.Write("签名签证失败")
	Dim debugInfo
	debugInfo = resHandler.getDebugInfo()
	Response.Write("<br/>debugInfo:" & debugInfo & "<br/>")
End If
%>