?? gopay.asp
字號:
<script language="javascript">
window.alert("對不起,網(wǎng)上支付功能尚未開通!");
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("聯(lián)系電話")
Mmsg(5)=rs("備注")
Mmsg(6)=rs("禮品")
Mmsg(7)=rs("狀態(tài)")
Mmsg(8)=rs("接收時間")
Mmsg(9)=rs("客戶類型")
Mmsg(10)=rs("送票日期")
Mmsg(11)=rs("送票時間")
Mmsg(12)=rs("購票緊急聯(lián)系方式")
Mmsg(13)=rs("購票電郵地址")
Mmsg(14)=rs("支付方式")
Mmsg(15)=rs("送票方式")
Mmsg(16)=rs("配送要求")
Mmsg(17)=rs("送票城市")
Mmsg(18)=rs("送票標(biāo)志建筑")
Mmsg(19)=rs("郵政編碼")
Mmsg(20)=rs("出票確認(rèn)方式")
Mmsg(21)=rs("出票確認(rèn)聯(lián)系信息")
Mmsg(22)=rs("出票確認(rèn)方式")
Mmsg(23)=rs("網(wǎng)上支付計算公式")
Mmsg(24)=rs("網(wǎng)上結(jié)算金額")
Mmsg(25)=rs("網(wǎng)上客戶留言")
Mmsg(26)=rs("訂位狀態(tài)") 'DK" "HK" "RR" then '成功 00 失敗 01正在處理
Mmsg(27)=rs("網(wǎng)上扣款標(biāo)志") '1未處理 2扣款成功 3失敗
Mmsg(28)=rs("網(wǎng)上訂單狀態(tài)") '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>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -