📄 zxlmyflight.asp
字号:
<%
redim ZXLWeek(7)
ZXLWeek(1)="星期天"
ZXLWeek(2)="星期一"
ZXLWeek(3)="星期二"
ZXLWeek(4)="星期三"
ZXLWeek(5)="星期四"
ZXLWeek(6)="星期五"
ZXLWeek(7)="星期六"
'airticket_OrderID=trim(request.form("OrderID"))
airticket_OrderID=dateId
set rs=server.CreateObject("adodb.recordset")
sql="select * from ticket_D where [订单编号]='"&airticket_OrderID&"' order by [序号] asc"
rs.open sql,conn,3,1
dim DRecordcount
DRecordcount=rs.recordcount
redim flightMsg(DRecordcount,12)
redim TripMsg(3,10)
'response.write DRecordcount
dim TempId,lastId,myInsure
lastId=0
myInsure=0
'on error resume next
dim MyPNR,MyPNRContent
if not (rs.bof or rs.eof) then
rs.movefirst
MyPNR=trim(rs("PNR号"))
MyPNRContent=trim(rs("PNRContent"))
end if
i=0
do while not (rs.eof or rs.bof)
'flightMsg(i,0)=rs("订单编号")
TempId=Cint(rs("序号"))
if TempId<>lastId then
TripMsg(TempId-1,0)=rs("TakeOffTime")
TripMsg(TempId-1,1)=rs("FromCityCode")
TripMsg(TempId-1,2)=rs("ToCityCode")
TripMsg(TempId-1,3)=rs("ArriveTime")
TripMsg(TempId-1,4)=rs("航班号")
TripMsg(TempId-1,5)=rs("舱")
TripMsg(TempId-1,6)=rs("机型")
TripMsg(TempId-1,7)=rs("Carrier")
TripMsg(TempId-1,8)=rs("客票类型")
TripMsg(TempId-1,10)=rs("rebateName")
'TripMsg(TempId-1,0)=rs("保险")
lastId=TempId
end if
'flightMsg(i,1)=rs("序号")
flightMsg(i,1)=rs("保险")
myInsure=myInsure+Cint(flightMsg(i,1))
flightMsg(i,2)=rs("机票号码")
flightMsg(i,3)=rs("PNR号")
flightMsg(i,4)=rs("乘客姓名")
flightMsg(i,5)=rs("证件")
flightMsg(i,6)=rs("状态")
flightMsg(i,7)=rs("票价")
flightMsg(i,8)=rs("税收")
flightMsg(i,9)=trim(rs("类型"))
flightMsg(i,10)=rs("出生年月")
flightMsg(i,11)=rs("附加税收")
'response.write i&"<br>"
rs.movenext
i=i+1
loop
rs.close
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
'response.write Cstr(Mmsg(24))
'response.end
''''''''''''''''''''''''''''
rs.close
%>
<html>
<head>
<title><%=ZXLCompanyStr&"-- 订单内容"%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="smallPic/def.css" rel=stylesheet>
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onLoad="">
<table width="564" border="0" align="center" cellpadding="2" cellspacing="1">
<tr>
<td width="609" height="350" align="center" valign="top" bgcolor="#C3E7F9">
<table width=540 border=0 cellpadding=0 cellspacing=1 bgcolor="#FFFFFF">
<tbody>
<tr height="40">
<td width="53%" height=30 align="left"> <b><font class=px14 color="CC0000"><font color="#000000" class=px18><%=airticket_OrderID%></font>行程单信息：</font></b> </td>
<td width="47%"><div align="right"><a href="javascript:goPrint()"><img src="smallPic/hodometer_print.gif" width="125" height="25" border="0"></a></div></td>
</tr>
<tr align="left">
<td colspan="2" class=bg><table width=100 border=0 align=left cellpadding=0 cellspacing=0>
<tbody>
<tr>
<td bgcolor="#FFFFFF"><table cellspacing=1 cellpadding=2 width=556 border=0>
<tbody>
<tr>
<td><font color=#000000>
<%if Mmsg(29)<>"" then%>
您的订座编号是：<strong><%=Mmsg(29)%></strong>
<!-- PNR内容：<%'=MyPNRContent%> -->
<br>
您的预订编码如果全部是数字，则有可能为预订不成功，请及时致电<%=ZXLCompanyStr%>预订中心获得帮助。<%=ZXLCompanyStr%>24小时预定热线： <font color=#ff0000 class=px14><strong><%=ZXLTelCenter%></strong></font> E-mail：<a href="mailto:<%=ZXLCompanyEmail%>"><strong><%=ZXLCompanyEmail%></strong></a><br>
<%end if%>
建议您出发前与航空公司确认航班有无变更，<%=ZXLCompanyStr%>也会在接收到航班变更信息后及时通知您。</font></td>
</tr>
<tr>
<td width="548"><b><font class=px12 color="#000000">航班信息：</font></b></td>
</tr>
<tr>
<td><!-- start Author:ZhouXiaolong-->
<%for j=0 to TempId-1 %>
<table width='98%' border='0' cellspacing='2' cellpadding='0' align=center>
<tr bgcolor='EFF3F7'>
<td colspan='3' height='22' valign='left'><b> <strong><%=formatdatetime(TripMsg(j,0),1)%></strong>
<%
tripDate=Cdate(TripMsg(j,0))
response.write ReWeek(tripDate)%>
</b> <strong>
<%
if TripMsg(j,8)<>"" then response.write "<img src=../showimg/dianzzipiaobutton.gif align='absmiddle'>"%>
</strong></td>
<td align="center"><b>
<%TripMsg(j,9)=ReAirway(TripMsg(j,7))'航空公司名
response.write TripMsg(j,9)
%>
</b></td>
<td width='32' rowspan="3" align='center' valign="middle"><img src="../smallPic/<%=TripMsg(j,7)%>.gif" title="<%=TripMsg(j,7)%>"></td>
<!--<td> </td> -->
</tr>
<tr valign='buttom' bgcolor='#f6f6f6'>
<td width='125' rowspan="2" align='center' valign="bottom"><%=ReCity(TripMsg(j,1))%>(<%=TripMsg(j,1)%>)<br>
<%TakeOffTime=formatdatetime(tripDate,4)
response.write TakeOffTime%>
起飞</td>
<td width='118' rowspan="2" align='center' valign="bottom" bgcolor='#f6f6f6'><%=ReCity(TripMsg(j,2))%>(<%=TripMsg(j,2)%>)<br>
<%ArrivalTime=formatdatetime(TripMsg(j,3),4)
response.write ArrivalTime%>
到达</td>
<td width='124' align='center'>机型：<%=TripMsg(j,6)%></td>
<td width='135' rowspan="2" align='center' valign="buttom"><b><%=TripMsg(j,4)%> </b><br>
<b><%=ReBunk(TripMsg(j,5),TripMsg(j,7),TripMsg(j,10))%></b>（<strong><%=TripMsg(j,5)%>舱</strong>）</td>
</tr>
<tr valign='buttom' bgcolor='#f6f6f6'>
<td align='center'>历时<%=ReInterval(TakeOffTime,ArrivalTime)%>小时</td>
</tr>
</table>
<%next%>
<!-- End --> </td>
</tr>
</tbody>
</table>
<hr color=#cccccc width="550">
<table cellspacing=1 cellpadding=0 width=546 border=0 align="center">
<tbody>
<tr>
<td width="548"><b> <font class=px12 color="#000000">费用明细：</font></b></td>
</tr>
<tr>
<td class="L15"><table width='99%' border='0' align="center" cellpadding='1' cellspacing='２'>
<tr bgcolor='EFF3F7'>
<td width='88' style="" height='19' align='center'>姓名</td>
<td width='150' align='center'>证件号</td>
<td width='68' align='center'>机票费<font color='#cc0000'><b><br>
</b></font></td>
<td width='60' align='center'>机场税</td>
<td width='61' align='center'>附加费</td>
<td width='62' align='center'>保险费</td>
<td width='62' align='center'>费用总计</td>
</tr>
<tr bgcolor='#f6f6f6'>
<td colspan="5" align='center'><div align="center">
<table width="100%" border="0" cellpadding="0" cellspacing="2">
<!-- start -->
<%for j=0 to DRecordcount-1
TempCidOrBorn=""
TempCidOrBorn=flightMsg(j,5)
TempAirportTax=flightMsg(j,8)
TempFlightPrice=Cint(flightMsg(j,7))
if flightMsg(j,9)="儿童" then
TempFlightPrice=TempFlightPrice*0.5
TempCidOrBorn=flightMsg(j,10)
TempAirportTax="0"
elseif flightMsg(j,9)="婴儿" then
TempCidOrBorn=flightMsg(j,10)
TempAirportTax="0"
TempFlightPrice=TempFlightPrice*0.1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -