alipay_send.asp

二手商品交易平台二手商品交易平台二手商品交易平台二手商品交易平台二手商品交易平台二手商品交易平台二手商品交易平台二手商品交易平台二手商品交易平台二手商品交易平台

<!--#include file="order/Alipay/Alipay_Payto.asp"-->
<!--#include file="../comm/subconn.asp" -->
<%
key			=	request("PayKey")	'获取数据库密钥
m_id		=	request("StoreID")	'商户号
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				=	request("StoreID")				'商户支付宝账户（改成你自己的）
	t3				=	request("PayKey")				'安全校验码（改成你自己的）		
	t4				=	"order/alipay/alipay1.com.gif"		'支付宝按钮图片
	t5				=	"进入支付宝支付网关付款"			'按钮悬停说明
	cmd				=	"0001"							'cmd		命令码
	subject			=	"["&sitename&"]订单号码:"&request("inBillNo")		'subject	商品名称
	body			=	"从["&sitename&"]提交的订单"			'body		商品描述
	order_no		=	request("inBillNo")				'order_no	商户订单号
	prices			=	request("Total")				'price		商品单价 0.01～50000.00
	number			=	1								'number			购买数量
	rurl			=	""								'url			商品展示网址
	types			=	1								'type支付类型	1：商品购买2：服务购买3：网络拍卖4：捐赠
	transport		=	""								'transport		发货方式 1：平邮2：快递3：虚拟物品
	ordinary_fee	=	"0.00"							'ordinary_fee	平邮运费
	express_fee		=	"0.00"							'express_fee	快递运费
	readonly		=	"true"							'readonly		交易信息是否只读
	buyer_msg		=	request("Notes")				'buyer_msg		买家给卖家的留言
	buyer			=	""								'buyer			买家Email
	buyer_name		=	request("RecName")				'buyer_name		买家姓名
	buyer_address	=	request("RecAddress")			'buyer_address	买家地址
	buyer_zipcode	=	request("ZipCode")				'buyer_zipcode	买家邮编
	buyer_tel		=	request("RecPhone")				'buyer_tel		买家电话号码
	buyer_mobile	=	""								'buyer_mobile	买家手机号码
	partner			=	"2088002009477711"				'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)

%>
<table width="98%" height="100%" border="1" cellspacing="0" cellpadding="0" align="center" style="border-collapse: collapse" bordercolor="#CCCCCC">
 <tr>
    <td  align="center">
	<%=itemUrl%>
</td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td align="center" height="30"><font color="#333333"> 程序支持：<a href="http://www.cycoo.net" target="blank_">思高网络</a></font></td>
  </tr>
</table>