index.asp

来自「机票预定系统 各个模块的设计-ticket reservation system」· ASP 代码 · 共 26 行

<!--#include file="alipayto/alipay_payto.asp"-->
<%
if request.form("flagstr")="addok" then
   'shijian=now()
   'dingdan=year(shijian)&month(shijian)&day(shijian)&hour(shijian)&minute(shijian)&second(shijian)
    '客户网站订单号，（现取系统时间，可改成网站自己的变量）
	referurl=request.ServerVariables("HTTP_REFERER")
	url=request.ServerVariables("Server_Name")
	if mid(referurl,8,len(url))=url then
		dingdan=trim(request.form("orderno"))
		price=trim(request.form("amount"))
		pnr=trim(request.form("pnr"))
		subject			=	"预订机票"		'商品名称
		body			=	pnr		'body			商品描述
		out_trade_no    =   dingdan       
		''price		    =	"0.01"				'price商品单价			0.01～50000.00
		quantity        =   "1"               '商品数量,如果走购物车默认为1
		discount        =   "0"               '商品折扣
		seller_email    =    seller_email   '卖家的支付宝帐号
		Set AlipayObj	= New creatAlipayItemURL
		itemUrl=AlipayObj.creatAlipayItemURL(subject,body,out_trade_no,price,quantity,seller_email)
		response.redirect itemUrl
	end if
%>

<%end if%>