<script language="javascript">
window.alert("對不起，網上支付功能尚未開通！");
history.back();
//window.location="history.back()";
</script>
<!--#include file="../../config.asp"-->
<!--#include file="../manager/function/conn.asp"-->
<%
airticket_OrderID=trim(request.form("Ord"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from ticket_M where [訂單編號]='"&airticket_OrderID&"'"
rs.open sql,conn,3,1
if not (rs.eof or rs.bof) then
redim Mmsg(30)
Mmsg(1)=rs("客戶編號")
Mmsg(2)=rs("客戶姓名")
Mmsg(3)=rs("送票地址")
Mmsg(4)=rs("聯系電話")
Mmsg(5)=rs("備注")
Mmsg(6)=rs("禮品")
Mmsg(7)=rs("狀態")
Mmsg(8)=rs("接收時間")
Mmsg(9)=rs("客戶類型")
Mmsg(10)=rs("送票日期")
Mmsg(11)=rs("送票時間")
Mmsg(12)=rs("購票緊急聯系方式")
Mmsg(13)=rs("購票電郵地址")
Mmsg(14)=rs("支付方式")
Mmsg(15)=rs("送票方式")
Mmsg(16)=rs("配送要求")
Mmsg(17)=rs("送票城市")
Mmsg(18)=rs("送票標志建筑")
Mmsg(19)=rs("郵政編碼")
Mmsg(20)=rs("出票確認方式")
Mmsg(21)=rs("出票確認聯系信息")
Mmsg(22)=rs("出票確認方式")
Mmsg(23)=rs("網上支付計算公式")
Mmsg(24)=rs("網上結算金額")
Mmsg(25)=rs("網上客戶留言")
Mmsg(26)=rs("訂位狀態")     'DK" "HK" "RR" then '成功  00 失敗 01正在處理
Mmsg(27)=rs("網上扣款標志") '1未處理 2扣款成功 3失敗
Mmsg(28)=rs("網上訂單狀態") '1
Mmsg(29)=rs("訂座編號") '1
end if


'response.write airticket_OrderID&"<br>"
'response.write Cstr(Mmsg(24))
'response.end

''''''''''''''''''''''''''''
rs.close
set rs=nothing
call conn_close()
%>
<form id=frmPayment name=frmPayment>
<INPUT type=hidden value="<%=airticket_OrderID%>" name=Ord>
<INPUT type=hidden value="<%=Cstr(Mmsg(24))%>" name=summoney>
</form>
<SCRIPT LANGUAGE=javascript>
<!--
  frmPayment.Ord.value=<%=airticket_OrderID%>;
  frmPayment.summoney.value=<%=Cstr(Mmsg(24))%>;
  frmPayment.action = "../pay/ZXLEpayment.asp";
  frmPayment.submit();
//-->
</SCRIPT>