📄 show.asp
字号:
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<!--#include file="Conn.asp"-->
<!--#include file="Config.asp"-->
<!--#include file="pro_data.asp"-->
<%
dim time01,time03,cheapset,sign
time01=session("time01")'起飞时间
time03=request.form("time03")'返程时的起飞时间
cheapset=request.form("cheapset")'仓位
sign=request.form("sign")'电子票
fc=trim(request("fc"))
if fc="two" and left(session("fly_num1"),2)<>"" then
hang_code=left(session("fly_num1"),2)
else
hang_code=session("airlineCode01")
end if
if hang_code="" then
hang_code="all"
end if
dim values,values2,fly_values,fly_values2
gourl="goto.asp" '预订转换页面
if trim(request.form("fly_values2"))<>"" then '判断有几程
cc=2
else
cc=1
end if
if fc="two" Then
cek="OK"
values=session("values2")
Else
session("values2")=trim(request.form("fly_values2"))
cek=trim(request("cek"))
values=trim(request.form("fly_values"))
end If
If values="" or values="1" Then
errclose("对不起,暂无相关航班!")
response.End
else
'response.Write(session("values2"))&"<br>"
'response.Write(values)&"<br>Test<br>"
'response.end
fly_values=split(fly_str(values),"&") '第一次分解数据
bank_url=session("Bank_url")
Order_flag=split_str(values,0,1)
Name_num=split_str(values,1,1) '有多少个航班
StartCity=split_str(values,2,1) '三字代码起飞城市
EndCity=split_str(values,3,1) '三字代码到达城市
Startcity_cn=codetocity(StartCity) '中文起飞城市
EndCity_cn=codetocity(EndCity) '中文降落城市
Dates=split_str(values,4,1) '日期
Dates2=SenFe_Date(split_str(session("values2"),4,1)) '返程日期
fullprice=split_str(values,5,1) '全价
Airs=split_str(values,6,1) '航线数----与Name_num相同
gasTaxPrice=ta_you(StartCity,EndCity) '燃油附加
distance=ta_distance(StartCity,EndCity) '里程数
jianshefei=ta_jianshe(StartCity,EndCity)
PlaneTypes=split_fly(fly_values(i),4) '机型
TimeFrom=split_fly(fly_values(i),5) '起飞时间
TimeTo=split_fly(fly_values(i),6) '到达时间
sscity=codetocity(split_str(values,2,1))&"("&split_str(values,2,1)&")"
eecity=codetocity(split_str(values,3,1))&"("&split_str(values,3,1)&")"
Tscity=codetocity(split_str(values,2,1))&split_str(values,2,1)
Tecity=codetocity(split_str(values,3,1))&split_str(values,3,1)
STARENDCITY=split_fly(fly_values(i),1)&split_fly(fly_values(i),2)
%>
<%
'''获取客户端的特价
client_actionbunk=get_c_actionbunk(Dates,StartCity,EndCity,fullprice)
'''response.write values&"<br>"&server_actionbunk&"<br>"&client_actionbunk
%>
<title><%=Startcity_cn%> - <%=EndCity_cn%> 本次查询共<%=Name_num%>个航班 机票实时查询系统</title>
<link href="css.css" rel="stylesheet" type="text/css" media="all" />
<link href="show.css" rel="stylesheet" type="text/css" media="all" />
<script language="JavaScript" src="js/show.js"></script>
</head>
<BODY leftMargin=0 topMargin=0 onLoad="resetDiv()">
<script language=javascript>
function resetDiv(){
var m1=document.getElementById("pagebody");
var m2=document.getElementById("sidebar");
if(m1.offsetHeight>m2.offsetHeight){
m2.style.pixelHeight=m1.offsetHeight;
}
else{
m1.style.pixelHeight=m2.offsetHeight;
}
}
</script>
<!--#include file="top.asp"-->
<div id="pagebody"><!--页面主体-->
<div id="sidebar"><!--#include file="leftcity.asp"--><!--侧边栏--></div>
<%if cek="OK" Then%>
<div id="mainbody"><!--行程--><span class="soti06" style="float:left;margin:8px auto;">
<%
if sscity="南苑(NAY)" then sscity="北京(PEK)"
if eecity="南苑(NAY)" then eecity="北京(PEK)"
response.Write sscity&"-"&eecity
%>
</span>
<span style="float:right;"> <IMG height=59 src="img/head02.gif" width=247></span>
</div>
<div id="mainbody"><!--去程信息预览-->
<%if fc="two" then%>
<table width="100%" cellpadding="0" cellspacing="0">
<tr><td><strong>1、审核去程机票信息</strong></td></tr>
</table>
<TABLE cellSpacing="1" cellPadding="2" width="100%" align="center" >
<TR bgColor="#f7ef95">
<TD bgColor="#F4FAFD"><strong><%=session("fly_date1")%></strong></TD>
<TD bgColor="#F4FAFD"> </TD>
<TD bgColor="#F4FAFD"> </TD>
<TD bgColor="#F4FAFD" align="right"><A href="javascript:history.back(-2);"><U>修改航班</U> </A></TD>
</TR>
<TR bgColor="#eeeeee">
<TD bgColor="#eff3f7">出发:<%=session("Startcity_cn1")%>(<%=session("StartCity1")%>)</TD>
<TD bgcolor="#eff3f7">到达:<%=session("EndCity_cn1")%>(<%=session("EndCity1")%>)</TD>
<TD colSpan="2" bgcolor="#eff3f7"><%=session("airways1")%> <A href="page.asp?ty=5&tname=<%=session("airways1")%>&tid=<%=left(session("fly_num1"),2)%>" target="_blank">退改签规定</A></TD>
</TR>
<TR bgColor="#eeeeee">
<TD bgcolor="#eff3f7">起飞时间:<%=session("time_from1")%></TD>
<TD bgcolor="#eff3f7">降落时间:<%=session("time_to1")%></TD>
<TD bgcolor="#eff3f7">航班号:<%=session("fly_num1")%></TD>
<TD bgcolor="#eff3f7">机型:<%=session("planetype1")%></TD>
</TR>
<TR bgColor="#eeeeee">
<TD colSpan="2" bgcolor="#eff3f7">飞行时长:<%=DateDiff("n",session("time_from1"),session("time_to1"))\60%>时<%=DateDiff("n",session("time_from1"),session("time_to1")) mod 60%>分</TD>
<TD bgcolor="#eff3f7">舱位:<%=session("b_type1")%>(<%=session("bunk1")%>)</TD>
<TD bgcolor="#eff3f7">
价格:<%=cint(session("price1"))+cint(session("gasTaxPrice"))+cint(session("jianshefei"))%> (含燃油费<%=session("gasTaxPrice")%> 机场税<%=session("jianshefei")%>)</TD>
</TR>
</TABLE>
<table width="100%" cellpadding="0" cellspacing="0">
<tr><td><strong>2、选择回程航班</strong> (来回程同时选择深航、南航、国航可享受额外5%优惠)</td></tr>
</table>
<%end if%>
</div>
<div id="mainbody"> 按航空公司显示:
<%if StartCity="SHA" OR EndCity="SHA" OR StartCity="PVG" OR EndCity="PVG" THEN%>
<a href="#" onClick="displayinfo('<%=name_num-1%>','SHA');" class="uline">上海虹桥</a> | <a href="#" onClick="displayinfo('<%=name_num-1%>','PVG');" class="uline">上海浦东</a> |
<%else
sql="select AirwayName,CarrierCode from Airways"
set rs=conn.execute(sql)
Do while not rs.eof
X_Airways=trim(rs("AirwayName"))
X_CarrierCode=trim(rs("CarrierCode"))
for i=0 to Name_num-1
bunk_str=split(fly_values(i),"^") '只取舱位价格段
order_co=Left(bunk_str(3),2)
IF instr(X_CarrierCode,order_co)<>0 then
airLineCodeGif=airLineCodeGif+","+order_co
end If
next
if instr(airLineCodeGif,X_CarrierCode)<>0 Then%>
<a href="#" onClick="displayinfo('<%=name_num-1%>','<%=X_CarrierCode%>');" class="uline"><%=Left(X_Airways,4)%></a> |
<% end if
rs.movenext
Loop
rs.close
set rs=nothing
end if%>
<a href="#" onClick="displayinfo('<%=name_num-1%>','all');" >显示全部航班</a> <!--选择航空公司-->
</div>
<div id="mainbody" style="background-color:#eff3f7;line-height:28px;"><!--出发日期及航班数--><span class="STYLE-1 STYLE-31" style="float:left;">出发日期:<%=Dates%> <%=weekdayname(weekday(Dates))%></span><span class="STYLE-1" style="float:right;"> 共<%=Name_num%>个航班</span>
</div>
<div id="mainbody"><!--提示信息--><span class="STYLE-38"><STRONG>注</STRONG>:</span>该航段共<span class="STYLE-31"><STRONG><%=distance%></STRONG></span>公里,以下票价未包含 <span class="STYLE-38">机场建设费(<%response.write jianshefei&"元"%>)</span> 和 <span class="STYLE-38"><STRONG>燃油附加费(<%response.write gasTaxPrice&"元"%>)</STRONG> </span>。
</div>
<div id="mainbody">
<!--主体内容-->
<%
for i=0 to Name_num-1
bunk_str=split(fly_values(i),"^") '舱位价格段
flyNo=split_fly(fly_values(i),3) '航班号---------lyq修改
%>
<div id="line<%=i%>">
<input name="hidden" type="hidden" id="code<%=i%>" value="<%
if (split_fly(fly_values(i),1)="PVG" or split_fly(fly_values(i),2)="PVG") THEN
response.write "PVG"
else
if (split_fly(fly_values(i),1)="SHA" or split_fly(fly_values(i),2)="SHA") THEN
response.write "SHA"
else
response.write Left(bunk_str(3),2)
End if
End if%>">
<!-----------主体部分---------------->
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=1>
<TR>
<TD bgColor=#ffffff>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0>
<TR>
<TD background=img/danbj.gif colSpan=5 height=1></TD>
</TR>
<TR bgcolor="#f6f6f6">
<TD height=5 colSpan=5 bgcolor="#eff3f7">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<TD width=36 bgcolor="#eff3f7"><a href="page.asp?ty=1&tname=<%=F_Airways(left(flyNo,2))%>&tid=<%=left(flyNo,2)%>" target="_blank"><IMG src="search/<%=Airimg(left(flyNo,2))%>" alt=<%=F_Airways(left(flyNo,2))%>
border="0"></a> </TD>
<TD width="157" bgcolor="#eff3f7"><div align="left"><a href="page.asp?ty=1&tname=<%=F_Airways(left(flyNo,2))%>&tid=<%=left(flyNo,2)%>" target="_blank"><font color=#000099><strong><%=F_Airways(left(flyNo,2))%></strong></font></a></div>
<input name="hidden" type="hidden" id="start_time<%=i%>" value="<% if time01<>"" then
start_hour1=hour(Cdate(Dates&" "&time01))
start_hour2=hour(CDate(Dates&" "&fly_time(split_fly(fly_values(i),5))))
if start_hour1>=start_hour2 then
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -