<%
'====================   支 付 寶   ====================
sub pay_AliPay()
	dim service,agent,partner,sign_type,subject,body,out_trade_no,price,discount,show_url,quantity,payment_type,logistics_type,logistics_fee,logistics_payment,logistics_type_1,logistics_fee_1,logistics_payment_1,receive_name,seller_email,notify_url
	dim t1,t4,t5,key
	dim AlipayObj,itemUrl
	dim alipay_name
    alipay_name=order_info_no&"號訂單"
    

	t1				=	"https://www.alipay.com/cooperate/gateway.do?"	'支付接口
	t4				=	"images/alipay_bwrx.gif"		'支付寶按鈕圖片
	t5				=	"推薦使用支付寶付款"						'按鈕懸停說明
	
	service         =   "trade_create_by_buyer"
	agent           =   "" '合作廠商id
	partner			=	parterid		'partner合作伙伴ID(必須填)
	sign_type       =   "MD5"
    subject         =   alipay_name	  '商品名稱
	body			=	ProdNames&"(配送費用已包含在內)"		'body			商品描述
	out_trade_no    =   order_info_no           '客戶網站訂單號，（現取系統時間，可改成網站自己的變量）
	price		    =	order_info_allcost				'price商品單價			0.01～50000.00
    discount        =   "0"               '商品折扣
    show_url        =   ""        '商品展示地址（可以直接寫網站首頁網址）
    quantity        =   "1"               '商品數量
    payment_type    =   "1"                '支付類型，（1代表商品購買）
    logistics_type  =   "EXPRESS"          '物流種類（快遞）
    logistics_fee   =   "0"                '物流費用
    logistics_payment  =   "SELLER_PAY"    '物流費用承擔(賣家付)
	logistics_type_1  =   ""
    logistics_fee_1   =   "0"
    logistics_payment_1  =   "BUYER_PAY"   '物流費用承擔(買家付)
    seller_email    =    v_mid   '(必須填)
    key             =    key1  '(必須填)
    
    notify_url=  "alipay/Alipay_Notify.asp"   '服務器通知url（不使用，請不要注釋或者刪除此參數，不用傳遞給支付寶系統，Alipay_Notify.asp文件所在路經） 

	Set AlipayObj	= New creatAlipayItemURL
	itemUrl=AlipayObj.creatAlipayItemURL(t1,t4,t5,service,agent,partner,sign_type,subject,body,out_trade_no,price,discount,show_url,quantity,payment_type,logistics_type,logistics_fee,logistics_payment,logistics_type_1,logistics_fee_1,logistics_payment_1,seller_email,notify_url,key)	
	response.write itemUrl
end sub
%>