📄 show.asp
字号:
response.write("1")
else
response.write("0")
end if
else
response.write("-1")
end if
%>"></TD>
<TD width=183 bgcolor="#eff3f7"><strong><span class="STYLE-31"><span class="STYLE-15">Q</span> 航班号：<%=trim(Left(flyNo,7))%></span></strong></TD>
<TD width="116" bgcolor="#eff3f7">
<%if split_fly(fly_values(i),9)=1 then%>
<a href="page.asp?ty=2&tname=<%=F_Airways(left(flyNo,2))%>-电子客票&tid=<%=left(flyNo,2)%>" target="_blank" class="STYLE-24"><span class="STYLE-30">8</span><span class="STYLE-29">支持电子票</span></a>
<%else%>
<span class="STYLE-36">8</span><span class="STYLE-35">无电子票</span>
<%end if%> </TD>
<TD width="119" align="right" bgcolor="#eff3f7"><a href="page.asp?ty=3&tname=<%=split_fly(fly_values(i),4)%>&tid=<%=left(flyNo,2)%>" target="_blank" class="uline"><span class="STYLE-15">Q</span> 机型：<%=split_fly(fly_values(i),4)%></a></TD>
</tr>
</table></TD>
</TR>
<TR bgcolor="#FFFFFF">
<TD width="39" height="25" align="center" bgcolor="#FFFFFF"><span class="STYLE-14 STYLE-10">k</span></TD>
<TD width="159" valign="middle" nowrap bgcolor="#FFFFFF"><span class="STYLE-33">起飞：<%=fly_time(split_fly(fly_values(i),5))%> 分</span></TD>
<TD width="111" valign="middle" nowrap bgcolor="#FFFFFF"><strong><span class="STYLE-21">q</span><a href="page.asp?ty=4&tname=<%=split_fly(fly_values(i),1)%>&tid=<%=left(flyNo,2)%>" target="_blank" class="uline">
<%response.Write codetocity(split_fly(fly_values(i),1))&"机场"
%></a></strong></TD>
<TD width="176" valign="middle" nowrap bgcolor="#FFFFFF">起飞日期：<strong><%=Dates%></strong></TD>
<TD width="146" bgcolor="#FFFFFF"> 餐食：
<% dining=split_fly(fly_values(i),8) '餐食
if dining=1 then
dining="有餐"
else
dining="无餐"
end if
response.Write(dining)
%> </TD>
</TR>
<TR bgcolor="#FFFFFF">
<TD height="25" align="center" bgcolor="#FFFFFF" class="STYLE-14 STYLE-10">A</TD>
<TD valign="middle" nowrap bgcolor="#FFFFFF"><span class="STYLE-33">到达：<%=fly_time(split_fly(fly_values(i),6))%> 分</span></TD>
<TD valign="middle" nowrap bgcolor="#FFFFFF"><strong><span class="STYLE-21">q</span><a href="page.asp?ty=4&tname=<%=split_fly(fly_values(i),2)%>&tid=<%=left(flyNo,2)%>" target="_blank" class="uline">
<%response.Write codetocity(split_fly(fly_values(i),2))&"机场"
%></a></strong></TD>
<TD valign="middle" nowrap bgcolor="#FFFFFF">
<%If distance<>"" then
'判断大小飞机
little_plane="208,D38,AT7,CRJ,ERJ,EM4,DH8,YN2"
if instr(little_plane,split_fly(fly_values(i),4))>0 then
jianshefei1=10
else
jianshefei1=jianshefei
end if
response.write "机场税/燃油费 ￥"&jianshefei1&"/"&gasTaxPrice
End If
if jianshefei1="" or not isnumeric(jianshefei1) then
jianshefei1=50
end if
%></TD>
<TD bgcolor="#FFFFFF"><font color="#000000"> 经停：
<% state=split_fly(fly_values(i),7) '经停
if state=1 then
state="本段直飞"
else
state="经停1次"
end if
response.Write(state)
%>
</font></TD>
</TR>
</TABLE>
<%
'''以下是对舱位进行整合处理：去假位，整合静态特价、动态特价、排序
'''response.write bunk_str(10)&"<BR>"&flyNo&"<br>"&bunk_str(11)&"LYQ"
if len(bunk_str(10))>0 then
'去假位
'''''lyq-2007-3-26服务器上的特价信息
server_actionbunk=""
if ubound(bunk_str)>10 then
if len(bunk_str(11))>9 then
server_actionbunk=bunk_str(11)
end if
end if
''''response.write server_actionbunk
''''''----------end
falsebunkflyNo=falsebunk(bunk_str(10),trim(Left(flyNo,7)),dates)
dimvarfindbunk=findbunk(graner(left(flyNo,2)),getactionbunk(Left(flyNo,6),client_actionbunk,server_actionbunk),falsebunkflyNo)
if not(isnull(dimvarfindbunk) OR len(dimvarfindbunk)<=0)then
NoSortedBunkListArray=split(dimvarfindbunk,"#")
'对数组进行排序
SortedBunkListArray=BubbleSort(NoSortedBunkListArray)
CheapestIndex=lbound(SortedBunkListArray)
Lowestaprice=cint(mid((SortedBunkListArray(CheapestIndex)),1,2))
'''response.write SortedBunkListArray(CheapestIndex)
%>
<TABLE cellSpacing=1 cellPadding=0 width="100%" border=0>
<TR bgcolor="#EFF3F7">
<TD>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF">
<TR bgcolor="#EFF3F7">
<TD width=100 height=22 bgcolor="#eff3f7" ><span class="YBT STYLE-29"> <%response.write pricetodiscount(Lowestaprice,fullprice,2)%>元</strong></TD>
<TD width=95 height=22 bgcolor="#eff3f7" >
<%
SortedBunkItemArray=split((SortedBunkListArray(CheapestIndex)),"@")
select case SortedBunkItemArray(1)
case 0 '静态特价
bunk_fly_type= SortedBunkItemArray(3)
response.write "<font color=red>"&SortedBunkItemArray(3)&"("&mid(SortedBunkListArray(CheapestIndex),3,1)&")"&"</font>"
case 1 '动航班特价
bunk_fly_type= SortedBunkItemArray(3)
response.write "<font color=red>"&SortedBunkItemArray(3)&"("&mid(SortedBunkListArray(CheapestIndex),3,1)&")"&"</font>"
case 2 '动航线特价
bunk_fly_type= SortedBunkItemArray(3)
response.write "<font color=red>"&SortedBunkItemArray(3)&"("&mid(SortedBunkListArray(CheapestIndex),3,1)&")"&"</font>"
case else
bunk_fly_type= returndiscountstr(mid(SortedBunkListArray(CheapestIndex),1,2))
response.write returndiscountstr(mid(SortedBunkListArray(CheapestIndex),1,2))&"("&mid(SortedBunkListArray(CheapestIndex),3,1)&")"
end select
%> </TD>
<TD width=135 height=22 bgcolor="#eff3f7" ><span class="STYLE-15">v</span>剩余票数<strong>
<% if SortedBunkItemArray(1)=0 then '静态特价
response.write SortedBunkItemArray(2)
else
response.write bunk_num(mid(SortedBunkListArray(CheapestIndex),4,1))
end if%></strong> 张</TD>
<TD width=172 height=22 align="center" bgcolor="#eff3f7" class=soti03><a href="page.asp?ty=5&tname=<%=F_Airways(left(flyNo,2))%>&tid=<%=left(flyNo,2)%>" target="_blank" class="uline"><span class="STYLE-15">2</span>退改签规定</a></TD>
<TD width=106 height=24 align="right" valign="middle" bgcolor="#eff3f7"><%dDates=Dates & " " & fly_time(split_fly(fly_values(i),5))
If DateDiff("h",Now(),dDates)<1 Then
If DateDiff("s",Now(),dDates)<1 Then
response.write "<strong>已起飞</strong>"
Else
response.write "<strong>已停售</strong>"
End If
Else
''''lyq 2007-3-16
urlstring="cc="&cc&"&bf="&right(values,1)&"&price="&pricetodiscount(Lowestaprice,fullprice,2)&"&fullprice="&fullprice&"&bunk="&mid(SortedBunkListArray(CheapestIndex),3,1)&"&b_type="&bunk_fly_type&"&fly_num="&flyNo&"&airways="&F_Airways(left(flyNo,2))&"&fly_date="&Dates&"&Startcity_cn="&codetocity(split_fly(fly_values(i),1))&"&EndCity_cn="&codetocity(split_fly(fly_values(i),2))&"&time_from="&fly_time(split_fly(fly_values(i),5))&"&time_to="&fly_time(split_fly(fly_values(i),6))&"&planetype="&split_fly(fly_values(i),4)&"&Startcity="&split_fly(fly_values(i),1)&"&EndCity="&split_fly(fly_values(i),2)&"&ZXLCityFlyCode="&split_fly(fly_values(i),1)&split_fly(fly_values(i),2)&"&jianshefei="&jianshefei1&"&distance="&distance&"&gasTaxPrice="&gasTaxPrice&"&sortfly="&(mid(SortedBunkListArray(CheapestIndex),3,1))&(mid(SortedBunkListArray(CheapestIndex),1,2))&"&bunkseat="&SortedBunkItemArray(4)
if trim(SortedBunkItemArray(4))="S" then'判断是否是服务器上的特价信息
urlstring=urlstring&"&providercode="&SortedBunkItemArray(7)&"&fandian="&SortedBunkItemArray(8)&"&backmoney="&SortedBunkItemArray(9)&"&limitif="&SortedBunkItemArray(10)&"&ticketgrade="&SortedBunkItemArray(11)&"&qian_zhu="&SortedBunkItemArray(12)&"&special="&SortedBunkItemArray(13)
end if
%>
<a href="<%=gourl%>?<%=urlstring%>"><IMG src="img/order_seat.gif" width=96 height=21 border="0" align="absmiddle"></a>
<%End if%></TD></TR>
</TABLE>
<DIV id=Str<%=i%> style="DISPLAY:none; ">
<%
for BunkItemIndex=1 to Ubound(SortedBunkListArray)
adisscount=cint(mid((SortedBunkListArray(BunkItemIndex)),1,2))
aprice=cint(mid((SortedBunkListArray(BunkItemIndex)),1,2))
SortedBunkItemArray=split((SortedBunkListArray(BunkItemIndex)),"@")
''''response.write SortedBunkListArray(BunkItemIndex)
%>
<TABLE cellSpacing=1 cellPadding=0 width="100%" border=0>
<tr><td height="1" bgcolor="#9EDFFE"></td></tr>
</TABLE>
<!--#include file="detail_result.asp"-->
<% next %>
</DIV></TD>
</TR>
<TR>
<TD height="1" bgcolor="#9EDFFE"></TD></TR>
<TR>
<TD height="25" align="right"><IMG style="CURSOR: hand"
onclick=selet(Str<%=i%>,Dimg<%=i%>); height=18
src="img/blue_down_02.gif"
width=125 name=Dimg<%=i%>> </TD>
</TR>
</TABLE>
<%else
response.write "<div align='center'>此航班暂时没有舱位信息！</div>"
end if
else
response.write "<div align='center'>此航班暂时没有舱位信息！</div>"
end if%></TD>
</TR>
</TABLE>
<!-------------主体部分结束----------------------->
</div>
<%next%>
</div>
<div id="mainbody"><!--底部提示-->* 红色“折扣/价格”为特别优惠舱位，随订随售。舱位情况变动较大，以客服中心确认出票为准。<BR>
* 特别优惠舱位及部分折扣舱位执行三不准政策即不得签转、不得改签、不得退票，特提请注意！<BR>
* 国际航班目前只能查询航班时间，不能进行预定！</div>
<%else if cek="NU" then%>
<div id="mainbody"><!--无航班提示内容-->没有相关航班！<br><a href="<%=bank_url%>"><img src=img/yourcx_boutton.gif border=0></a></div>
<%else%>
<div id="mainbody"><!--系统故障提示内容-->系统故障！<br><a href="<%=bank_url%>"><img src=img/yourcx_boutton.gif border=0></a></div>
<%end if
end If
End if
conn_close()
%>
<script language="javascript">
function displayinfo(linenum,str)
{ for(j=0;j<linenum+1;j++)
{ if(document.getElementById("code"+j)!=null)
{
if(document.getElementById("code"+j).value==str||str=="all")
document.getElementById("line"+j).style.display="block";
else
document.getElementById("line"+j).style.display="none";
}
}
}
for(h=0;h<<%=Name_num%>;h++)
{// alert(document.getElementById("line"+i).align);
temp=document.getElementById("start_time"+h).value;
if(temp==1)
document.getElementById("line"+h).style.display="none";
else
document.getElementById("line"+h).style.display="block";
}
</script>
</div>
<!--#include file="bottom.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -