📄 guoji.asp
字号:
<!--#include file="../global/inc/global.inc.asp"-->
<%
on error resume next
FlyFlag = 1
ClassType = 3
BasicType = 3
oConn_Start
FromClassIdOptions = GetOptions("Select ClassId as id,ClassName as name from sm_Class Where ClassType="&ClassType&" And FatherId=0 And ValidFlag=1",0)
FlyIdOptions = GetOptions("Select BasicId as id,BasicName as name from sm_BasicParam Where ValidFlag=1 And BasicType="&BasicType,0)
'本页地址
WorldId = Request("WorldId")
CountryId = Request("CountryId")
FromClassId = Request("FromClassId")
ToClassId = Request("ToClassId")
CompanyId = Request("CompanyId")
thisurl = "guoji.asp?FromClassId="&FromClassId&"&ToClassId="&ToClassId&"&WorldId="&WorldId&"&CountryId="&CountryId&"&CompanyId="&CompanyId&"&"
strPagedList = strPagedList + "<table width=""100%"" align=""center"" cellpadding=""2"" cellspacing=""1"" bgcolor=""416383"">"& vbCrLf
strPagedList = strPagedList + " <tr align=""center"" bgcolor=""#2580D6"" height=""20"">"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">出发地</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">目的地</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">机场</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">航空公司</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">出发时间</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">到达时间</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">航班号</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">机型</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">每周航班</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">单程</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"">往返</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"" width=""46"">详细</td>"& vbCrLf
strPagedList = strPagedList + " <td class=""tw"" width=""72"">预订</td>"& vbCrLf
strPagedList = strPagedList + " </tr>"& vbCrLf
'获取时间开始
GoDateYear=request("GoDateYear")
if GoDateYear="" then
GoDateYear=Year(now)
end if
GoDateYear=int(left(GoDateYear,4))
GoDateMonth=request("GoDateMonth")
if GoDateMonth="" then
GoDateMonth=month(now)
end if
GoDateMonth=int(left(GoDateMonth,2))
'response.write GoDateMonth
'response.end
GoDateDay=request("GoDateDay")
if GoDateday="" then
GoDateday=day(now)
end if
GoDateday=int(left(GoDateday,2))
'获取时间结束
if GoDateYear-int(Year(now))>=1 and GoDateMonthM<>1 and Int(month(now))<>12 and int(day(now))<>25 then
strPagedList = strPagedList + "<tr><td align=center colspan=10 height=25 bgcolor=""#ffffff"">查询数据尚未更新!</td></tr>"
elseif GoDateMonth-int(month(now))<0 then
strPagedList = strPagedList + "<tr>"
strPagedList = strPagedList + "<td align=center colspan=13 height=25 bgcolor=""#ffffff"">查询数据已经过期！</td>"
strPagedList = strPagedList + "</tr>"
elseif GoDateMonth-int(month(now))>=1 and int(day(now))<25 then
strPagedList = strPagedList + "<tr>"
strPagedList = strPagedList + "<td align=center colspan=10 height=25 bgcolor=""#ffffff"">查询数据尚未更新！</td>"
strPagedList = strPagedList + "</tr>"
elseif GoDateMonth-int(month(now))>1 then
strPagedList = strPagedList + " <tr>"
strPagedList = strPagedList + "<td align=center colspan=10 height=25 bgcolor=""#ffffff"">查询数据尚未更新！</td>"
strPagedList = strPagedList + "</tr>"
Else
'获取分页产品分类
strSql = strSql + "Select C.ClassName,(Select ClassName From Sm_Class Where ClassId=I.ToClassId) as ToClassName,"&_
"(Select BasicName From Sm_BasicParam Where BasicId=I.FlyId) as FlyName,"&_
"(Select BasicName From Sm_BasicParam Where BasicId=I.CompanyId) as CompanyName,"&_
"I.* From Sm_Class c Inner Join Sm_InterFly I on c.ClassId=i.FromClassId Where I.FlyFlag="&FlyFlag
if FromClassId<>"" then strSql = strSql + " And i.FromClassId="&FromClassId
if ToClassId<>"" then strSql = strSql + " And i.ToClassId="&ToClassId
if WorldId<>"" then strSql = strSql + " And i.ToClassId in("&WorldId&getSort(WorldId,4)&")"
if CountryId<>"" then strSql = strSql + " And i.ToClassId in("&CountryId&getSort(CountryId,4)&")"
if CompanyId<>"" then strSql = strSql + " And i.CompanyId="&CompanyId
'strSql = strSql + " Order by I.DateCreated Desc"
strSql = strSql + " Order by ToClassName,FromTime,ToTime"
'Response.Write(strSql)
set oRs = server.CreateObject("adodb.recordset")
oRs.Open strSql,oConn,1,1
intcount = 0
pgsz=20 '设定每页显示记录数
if oRs.Eof Then
strPagedList = strPagedList &"<tr><td align=center height=25 bgcolor=white colspan=13><font color=red>还没有相关的机票信息！</red></td></tr>"
Else
count=oRS.recordcount '记录总数
oRS.PageSize = Cint(PgSz) '页面总数
Total=INT(count / PgSz * -1)*-1 '总的页数
PageNo=Request("pageno")
if PageNo="" Then
PageNo = 1
end if
if PageNo < 1 Then
PageNo = 1
end if
oRS.AbsolutePage = PageNo
While Not oRs.Eof and intcount<pgsz
InterId = oRs("InterId")
FromClassName = oRs("ClassName")
ToClassName = oRs("ToClassName")
FlyName = oRs("FlyName")
CompanyName = oRs("CompanyName")
FromTime = GetFlyTime(oRs("FromTime"))
ToTime = GetFlyTime(oRs("ToTime"))
FlyPrice = oRs("FlyPrice")
FlyDoublePrice = oRs("FlyDoublePrice")
FlyNo = oRs("FlyNo")
FlyType = oRs("FlyType")
FlyWeekNo = oRs("FlyWeekNo")
strPagedList = strPagedList + " <tr bgcolor=""#FFFFFF"" onMouseMove=""this.style.backgroundColor='C5DBF0'"" onMouseOut=""this.style.backgroundColor=''"" height=30> "& vbCrLf
strPagedList = strPagedList + " <td align=""center"">"&FromClassName&"</td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center"">"&ToClassName&"</td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center""> "&FlyName&" </td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center""> "&CompanyName&" </td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center"">"&FromTime&"</td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center"">"&ToTime&"</td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center"">"&FlyNo&"</td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center""> "&FlyType&" </td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center""> "&FlyWeekNo&" </td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center""><span class=""style1"">"&FlyPrice&"</span></td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center""><span class=""style1"">"&FlyDoublePrice&"</span></td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center""><a href=""../kgTicket/"&InterId&".htm"">查看</a><img src=""../images/icon.gif"" width=""16"" height=""16"" border=""0""></td>"& vbCrLf
strPagedList = strPagedList + " <td align=""center""><a href=""order1.asp?InterId="&InterId&""">订购<img src=""../images/basket.gif"" width=""20"" height=""14"" border=""0""></a></td>"& vbCrLf
strPagedList = strPagedList + " </tr> "& vbCrLf
intcount = intcount+1
oRs.MoveNext
Wend
strPageInfo = list_total(count,pageno,pgsz,total,thisurl)
oRs.Close
Set oRs = Nothing
End If
End If
strPagedList = strPagedList + " </table>"& vbCrLf
oConn_Close
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>国际机票-上海神马航空特价打折飞国际机票票价查询票务中心021-51099919</title>
<link href="../style.css" rel="stylesheet" type="text/css">
<script language="JavaScript">
function openremote() {
window.open("http://www.travelsky.com/gb/Trip.jsp","查看机票订座情况","toolbar=no,scrollbars=no,resizable=no,width=750,height=500")
}
</script>
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
<SCRIPT language=javascript>
var biz;
var speed=1000;
var pre=1;
var tidA=null;
var tidB=null;
var offsetA;
var offsetB;
var diff;
var t;
function doDateA()
{
dA = new Date();
gtA = dA.getTime();
document.regfrom.localtime.value=""+(dA.getMonth()+1)+"月"+(dA.getDate())+"日 "+dA.getHours()+":"+dA.getMinutes()+":"+dA.getSeconds() ;
tidA=window.setTimeout("doDateA()",speed);
}
function doDateB()
{
dB = new Date();
gtB = dB.getTime();
gtB = gtB + offsetB;
dB.setTime(gtB);
gtB = dB.getHours();
gtB = gtB -8;
dB.setHours(gtB);
document.regfrom.worldtime.value=""+(dB.getMonth()+1)+"月"+(dB.getDate())+"日 "+dB.getHours()+":"+dB.getMinutes()+":"+dB.getSeconds() ;
tidB=window.setTimeout("doDateB()",speed);
}
function start() {
d = new Date();
if (navigator.appVersion.substring(0,3) == "2.0")
offsetA = (d.getTimezoneOffset()*60*1000);
else
offsetA = -(d.getTimezoneOffset()*60*1000);
tidA=window.setTimeout("doDateA()",speed);
biz=offsetA;
}
function startLong(diff) {
offsetB = (diff) * 60 * 60 * 1000 + biz;
tidB=window.setTimeout("doDateB()",speed);
}
function cleartid() {
document.regfrom.worldtime.value=" ";
window.clearTimeout(tidB);
}
function selechan()
{
t=document.regfrom.selectarea.selectedIndex;
if (pre != t)
{
cleartid();
if ((t==65) || (t==93) || (t==113) || (t==125) || (t==135) || (t==163))
startLong(-4);
if ((t==64) || (t==87) || (t==137)) startLong(-0.5);
if ((t==63) || (t==104) || (t==144)) startLong(-2.5);
if ((t==45) || (t==102) || (t==108)) startLong(4);
if (t==32) startLong(-18.5);
if ((t==21) || (t==60) || (t==84) || (t==103) || (t==119) || (t==154))
startLong(0);
if ((t==19) || (t==22) || (t==24) || (t==35) || (t==41) || (t==46) || (t==53))
startLong(-6);
if ((t==68) || (t==73) || (t==78) || (t==79) || (t==81) || (t==86) || (t==99))
startLong(-6);
if ((t==126) || (t==128) || (t==141) || (t==148) || (t==150))
startLong(-6);
if ((t==153) || (t==161) || (t==177) || (t==178)) startLong(-6);
if ((t==15) || (t==33) || (t==42) || (t==56) || (t==59) || (t==94) || (t==109))
startLong(-14);
if (t==12) startLong(-2);
if ((t==11) || (t==38) || (t==43) || (t==66) || (t==74) || (t==76) || (t==85))
startLong(-5);
if ((t==124) || (t==127) || (t==133) || (t==140) || (t==155) || (t==162) || (t==167) || (t==174))
startLong(-5);
if ((t==10) || (t==26) || (t==28) || (t==30) || (t==34) || (t==40))
startLong(-13);
if ((t==58) || (t==71) || (t==115) || (t==118) || (t==166))
startLong(-13);
if ((t==8) || (t==55) || (t==91) || (t==116)) startLong(2);
if ((t==6) || (t==20) || (t==57) || (t==165)) startLong(-11);
if ((t==4) || (t==5) || (t==13) || (t==17) || (t==18) || (t==29) || (t==39))
startLong(-12);
if ((t==48) || (t==54) || (t==92) || (t==97) || (t==106) || (t==117))
startLong(-12);
if ((t==123) || (t==145) || (t==146) || (t==147) || (t==159) || (t==172) || (t==173))
startLong(-12);
if ((t==3) || (t==9) || (t==14) || (t==16) || (t==25) || (t==31) || (t==36) || (t==37))
startLong(-7);
if ((t==47) || (t==49) || (t==51) || (t==52) || (t==61) || (t==69) || (t==82))
startLong(-7);
if ((t==83) || (t==90) || (t==96) || (t==101) || (t==105) || (t==110) || (t==111))
startLong(-7);
if ((t==112) || (t==120) || (t==131) || (t==138) || (t==143) || (t==151))
startLong(-7);
if ((t==152) || (t==160) || (t==169) || (t==175) || (t==176))
startLong(-7);
if ((t==0) || (t==1) || (t==2) || (t==7) || (t==27) || (t==44))
startLong(-8);
if (t==23) startLong(-8);
if ((t==50) || (t==62) || (t==67) || (t==70) || (t==80) || (t==89) || (t==98))
startLong(-8);
if ((t==122) || (t==132) || (t==134) || (t==136) || (t==157) || (t==164))
startLong(-8);
if ((t==77) || (t==156) || (t==171)) startLong(-1);
if ((t==72) || (t==75) || (t==142)) startLong(1);
if ((t==88) || (t==114)) startLong(-3);
if ((t==95) || (t==129) || (t==130)) startLong(-19);
if (t==100) startLong(-1.5);
if ((t==107) || (t==121) || (t==139) || (t==168)) startLong(3);
if (t==158) startLong(5);
if (t==170) startLong(-12.5);
if (t==149) startLong(-11.5);
pre=t;
}
}
</SCRIPT>
<script language="javascript" src="../global/Script/changeDlList.js"></script>
</head>
<body>
<%=GetWebTop("3")%>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><table width="780" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="orgborder"><table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td class="txt1"><form method="post" action="guoji.asp" name="regfrom" id="regfrom" style="margin:0px">
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td bgcolor="f1f1f1" colspan="6">北京时间
<INPUT name=localtime size=16
style="COLOR: #000000">
<span class="样式1">选择国家</span>
<SELECT class=a1 name=selectarea
onchange=selechan() size=1 style="COLOR: #000000">
<OPTION selected>格林威治时间</OPTION>
<OPTION>阿尔及利亚</OPTION>
<OPTION>安道尔</OPTION>
<OPTION>安哥拉</OPTION>
<OPTION>安圭拉</OPTION>
<OPTION>安提瓜和巴布达</OPTION>
<OPTION>阿根廷</OPTION>
<OPTION>阿松森</OPTION>
<OPTION>澳大利亚</OPTION>
<OPTION>奥地利</OPTION>
<OPTION>巴哈马</OPTION>
<OPTION>巴林</OPTION>
<OPTION>孟加拉国</OPTION>
<OPTION>巴巴多斯</OPTION>
<OPTION>比利时</OPTION>
<OPTION>伯里兹</OPTION>
<OPTION>贝宁</OPTION>
<OPTION>百慕大群岛</OPTION>
<OPTION>玻利维亚</OPTION>
<OPTION>博茨瓦纳</OPTION>
<OPTION>巴西</OPTION>
<OPTION>文莱</OPTION>
<OPTION>保加利亚</OPTION>
<OPTION>布基纳法索</OPTION>
<OPTION>布隆迪</OPTION>
<OPTION>喀麦隆</OPTION>
<OPTION>加拿大</OPTION>
<OPTION>加那利群岛</OPTION>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -