<!-- 支付寶 包含頭文件 放在頂部 開始-->
<!--#include file="Alipay_Payto.asp"-->
<!-- 支付寶 包含頭文件 放在頂部 結(jié)束-->

<!-- 支付寶 接口代碼 開始 -->
<%
dim cmd,subject,body,order_no,prices,rurl,types,number,transport,ordinary_fee,express_fee,readonly,buyer_msg,buyer,buyer_name,buyer_address,buyer_zipcode,buyer_tel,buyer_mobile,partner
dim t1,t2,t3,t4,t5
dim AlipayObj,itemUrl
	t1				=	"https://www.alipay.com/payto:"	'支付接口
	t2		=	fyt2
	t3		=	fyt3	
	t4				=	"images/button_alipaybutton_o.gif"		'支付寶按鈕圖片
	t5				=	"推薦使用支付寶付款"						'按鈕懸停說明
	cmd				=	"0001"						'cmd			命令碼
	subject			=""&Session("boobuser")&"高級會員申請"		'subject		商品名稱
	body			=	"會員 "&Session("boobuser")&" 申請高級會員"			'body			商品描述
	order_no		=""&Session("boobuser")&""	'order_no		商戶訂單號
	prices			=fys5 					'price			商品單價			0.01～50000.00
	rurl			=strSiteUrl	'url			商品展示網(wǎng)址
	types			=	"2"						'type支付類型			1：商品購買2：服務(wù)購買3：網(wǎng)絡(luò)拍賣4：捐贈
	number			=	"1"						'number			購買數(shù)量
	transport		=	"3"					'transport		發(fā)貨方式			1：平郵2：快遞3：虛擬物品
	ordinary_fee	=	"10.00"			'ordinary_fee	平郵運費
	express_fee		=	"20.00"				'express_fee	快遞運費
	readonly		=	"true"				'readonly		交易信息是否只讀
	buyer_msg		=trim(request("fyly"))				'buyer_msg		買家給賣家的留言
	buyer			=trim(request("fyemail"))						'buyer			買家Email
	buyer_name		=trim(request("fyname"))			'buyer_name		買家姓名
	buyer_address	=trim(request("fyadd"))	'buyer_address	買家地址
	buyer_zipcode	=trim(request("fycode"))		'buyer_zipcode	買家郵編
	buyer_tel		=trim(request("fytel"))			'buyer_tel		買家電話號碼
	buyer_mobile	=trim(request("fysj"))	'buyer_mobile	買家手機號碼
	partner			=	""						'partner		合作伙伴ID			保留字段

	Set AlipayObj	= New creatAlipayItemURL
	itemUrl=AlipayObj.creatAlipayItemURL(t1,t2,t3,t4,t5,cmd,subject,body,order_no,prices,rurl,types,number,transport,ordinary_fee,express_fee,readonly,buyer_msg,buyer,buyer_name,buyer_address,buyer_zipcode,buyer_tel,buyer_mobile,partner)

%>