<% dim service,partner,sign_type,subject,body,out_trade_no,price,show_url,quantity,seller_email,notify_url,return_url,key dim t1,t4,t5 dim AlipayObj,itemUrl t1 = "https://www.alipay.com/cooperate/gateway.do?" '支付接口 t4 = "images/alipay_bwrx.gif" '支付宝按钮图片 t5 = "推荐使用支付宝付款" '按钮悬停说明 service = "create_digital_goods_trade_p" partner = "2088002123683814" 'partner 合作伙伴ID 保留字段 sign_type = "MD5" subject = "〖光影魔术手〗繁体版" 'subject 商品名称 body = "付款后请把交易号、注册姓名和机器码发送到:neoimaging@126.com,否则无法收到注册码!" 'body 商品描述 out_trade_no = Replace(Now(),"-","") out_trade_no = Trim(Replace(out_trade_no,":","")) out_trade_no = Trim(Replace(out_trade_no," ","")) price = "80.00" 'price 商品单价 0.01~50000.00 show_url = "http://www.neoimaging.cn/tw/index1.htm" '商品展示地址 quantity = "1" '商品数量 seller_email = "neoimaging@163.com" '卖家账户 key = "91deffe615ovr40you2qb19c757jvli1" '支付宝安全校验码 notify_url = "http://www.neoimaging.cn/alipay/Alipay_Notify.asp" return_url = "http://www.neoimaging.cn/" Set AlipayObj = New creatAlipayItemURL itemUrl=AlipayObj.creatAlipayItemURL(t1,t4,t5,service,partner,sign_type,subject,body,out_trade_no,price,show_url,quantity,seller_email,notify_url,return_url,key) response.Redirect itemUrl %>vice,partner,sign_type,subject,body,out_trade_no,price,show_url,quantity,seller_email,notify_url,return_url,key) response.Redirect itemUrl %>