📄 ckzx.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<%
dim show,starttime,endtime
show=request("show")
if show="" or show<>"false" then
show=true
end if
starttime=timer()
%>
<style type="text/css">
<!--
a:hover {
color: #FF3333;
text-decoration: none;
}
a:link {
text-decoration: none;
}
a:visited {
text-decoration: none;
}
a:active {
text-decoration: none;
}
-->
</style><!--#include file="../config.asp"-->
<title><%=WebTitle%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css.css" rel="stylesheet" type="text/css">
</head>
<%
dim selectsql
selectsql=0
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'文件内部常用SUB
Sub JGtable
%>
<table width="755" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="2" bgcolor="#FFFFFF"></td>
</tr>
</table>
<%
end sub
sub closers
rs.close
set rs=nothing
end sub
sub closeconn
conn.close
set conn=nothing
end sub
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'结束
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source ="& Server.MapPath("mfkiqpl/mdb/mfkiqpl.asp")
%>
<body>
<table width="778" height="5" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="170" bgcolor="#FF0000"></td>
<td width="28"></td>
<td width="580" bgcolor="#FF0000"></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="181" rowspan="2" align="center" valign="top"><table width="90" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="75"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="160" height="60">
<param name="movie" value="/flash/logo2.swf">
<param name="quality" value="high">
<embed src="/flash/logo2.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="160" height="60"></embed>
</object></td>
</tr>
<tr>
<td> </td>
</tr>
</table> </td>
<td width="15"> </td>
<td width="582"><img name="ck_r1_c1_2" src="../img/ck/ck_r1_c1.jpg" width="95" height="34" border="0" alt=""><img name="ck_r1_c2_2" src="../img/ck/ck_r1_c2.jpg" width="94" height="34" border="0" alt=""><img name="ck_r1_c3_2" src="../img/ck/ck_r1_c3.jpg" width="96" height="34" border="0" alt=""><img name="ck_r1_c4_2" src="../img/ck/ck_r1_c4.jpg" width="95" height="34" border="0" alt=""><img name="ck_r1_c5_2" src="../img/ck/ck_r1_c5.jpg" width="202" height="34" border="0" alt=""></td>
</tr>
<tr>
<td></td>
<td width="580" height="119" background="../img/bj.jpg"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="380" height="120">
<param name="movie" value="/flash/top.swf">
<param name="quality" value="high">
<param name="wmode" value="transparent">
<embed src="/flash/top.swf" width="380" height="120" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="37" background="/img/top_bg.jpg"><table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr align="center">
<td><a href="../mfkiqpl" target="_blank">旅游线路</a></td>
<td><a href="hotel_list.asp" target="_blank">宾馆酒店</a></td>
<td><a href="ticket_main.asp" target="_blank">火车票务</a></td>
<td><a href="ticket_main-1.asp" target="_blank">航空票务</a></td>
<td><a href="ticket_main-2.asp" target="_blank">旅游租车</a></td>
<td><a href="photos.asp" target="_blank">精华景点</a></td>
<td><a href="daoyou.asp" target="_blank">导游推荐</a></td>
<td><a href="join.asp" target="_blank">加入团队</a></td>
<td><a href="youandme.asp" target="_blank">结伴同行</a></td>
<td><a href="guestbook.asp" target="_blank">旅游留言</a></td>
</tr>
</table></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="35" background="/ckzx/bg-8.jpg"><table width="770" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="149" height="26" align="center" class="table_bg1"><script language=JavaScript>
today=new Date();
function initArray(){
this.length=initArray.arguments.length
for(var i=0;i<this.length;i++)
this[i+1]=initArray.arguments[i] }
var d=new initArray(
"星期日",
"星期一",
"星期二",
"星期三",
"星期四",
"星期五",
"星期六");
document.write(
today.getYear(),"年",
today.getMonth()+1,"月",
today.getDate(),"日 ",
d[today.getDay()+1] );
</script></td>
<td width="39" align="center" class="table_bg1"><img src="../images/gg.gif" width="22" height="22"></td>
<td width="358" class="table_bg1">
<marquee scrollamount="5" scrolldelay="100" width="320" onMouseOver="this.stop();" onMouseOut="this.start();">
<%=WebIndexMessage%>
</marquee></td>
<td width="74" align="center" class="table_bg1"><a href="listall.asp?action=userlook" target="_blank">预订查询</a> </td>
<td width="74" align="center" class="table_bg1"><a href="search.asp" target="_blank">站内搜索</a></td>
<td width="76" align="center" class="table_bg1"><a href="sendmessage.asp" target="_blank">站内短信</a></td>
</tr>
</table>
</td>
</tr>
</table>
<%call JGtable%>
<%call JGtable%>
<table width="757" border="0" align="center" cellpadding="0" cellspacing="0" class="table_1">
<tr>
<td width="227" height="220" valign="top" class="table_bg1"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="16" align="center" bgcolor="#f6f6f6"><a href="news.asp" target="_blank"><img src="../images/zxxw.gif" width="214" height="32" border="0"></a></td>
<td width="11" rowspan="2" valign="top"><img src="../images/mfk1.gif" width="11" height="160"></td>
</tr>
<tr>
<td height="200" bgcolor="#Fcfcfc"><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<%
set rs=conn.execute("select top 8 id,ntitle from news order by id desc")
selectsql=selectsql+1
while not rs.eof
%>
<tr>
<td height="24"> <a href="listnews.asp?id=<%=rs("id")%>" target=_blank></a><img src="../images/dot-10.gif" width="5" height="5"> <a href="listnews.asp?id=<%=rs("id")%>" target=_blank><%=left(rs("ntitle"),15)%>...</a></td>
</tr>
<%
rs.movenext
wend
closers
%>
</table></td>
</tr>
</table></td>
<td width="528" height="229" valign="top" class="table_bg1"><table width="528" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="../images/indextitle1.gif" width="480" height="32"></td>
<td><a href="../mfkiqpl" target="_blank"><img src="../images/indextitle-more.gif" width="48" height="32" border="0"></a></td>
</tr>
<tr valign="top">
<td colspan="2">
<table width="528" border="0" cellspacing="0" cellpadding="0">
<%
Set Rs=conn.Execute("select top 8 id,x_name,x_baojia,x_leixun,x_shijian from xianlu where x_top=1")
selectsql=selectsql+1
while not rs.eof
%>
<tr>
<td width="308" height="24"><img src="../images/dot-1.gif" width="12" height="9"> <a href="listxianlu.asp?id=<%=rs("id")%>"
target=_blank><%=rs("x_name")%></a></td>
<td width="90"><%=rs("x_baojia")%></td>
<td width="80"><%=rs("x_shijian")%></td>
<td width="50" align="center"><a href="giveme.asp?id=<%=rs("id")%>" target="_blank"><img src="../images/giveme.gif"
border="0"></a></td>
</tr>
<tr bgcolor="#CCCCCC">
<td height="1" colspan="4" bgcolor="#F7F7F7"></td>
</tr>
<%
rs.movenext
wend
Call closers
%>
</table> </td>
</tr>
</table></td>
</tr>
</table>
<%call JGtable
if showad1=1 then
call Ad1
end if
%>
<table width="755" border="0" align="center" cellpadding="0" cellspacing="0" class="table_1">
<tr bgcolor="#FFFFFF">
<td width="227" height="168"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="16" align="center" bgcolor="#f6f6f6"><a href="me.asp" target="_blank"><img src="../images/mfk7.gif" width="214" height="32" border="0"></a></td>
<td width="11" rowspan="2" valign="top"><img src="../images/mfk1.gif" width="11" height="160"></td>
</tr>
<tr>
<td height="200" bgcolor="#Fcfcfc"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<%
set rs=conn.execute("select id,dianhua,email,fax,address,qq from master where id=1")
selectsql=selectsql+1
%>
<tr>
<td width="25%" height="25" align="center">电话：</td>
<td width="75%"><%=rs("dianhua")%></td>
</tr>
<tr>
<td height="25" align="center">传真：</td>
<td><%=rs("fax")%></td>
</tr>
<tr>
<td height="25" align="center">地址：</td>
<td><%=rs("address")%></td>
</tr>
<tr>
<td height="25" align="center">邮件：</td>
<td><%=rs("email")%></td>
</tr>
<tr>
<td height="25" align="center">ＱＱ：</td>
<td><%=rs("qq")%></td>
<%
closers
set rs=conn.execute("select id,metext from me where id=1")
selectsql=selectsql+1
%>
</tr>
<tr>
<td height="75" colspan="2">
<table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><span class="text">我社简介：<%=left(rs("metext"),60)%><a href="me.asp" target=_blank>......</a></span></td>
</tr>
</table></td>
</tr>
<%
closers
%>
</table></td>
</tr>
</table></td>
<td width="528" height="229" valign="top"><table width="528" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="7"><table width="528" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="../images/thjd.gif" width="480" height="32"></td>
<td><a href="hotel_list.asp" target="_blank"><img src="../images/indextitle-more1.gif" width="48" height="32" border="0"></a></td>
</tr>
</table></td>
</tr>
<%
set rs=conn.execute("select top 8 id,hotel_name,hotel_city,hotel_level,hotel_add,hotel_type,hotel_price,hotel_price_1 from hotel order by id desc")
selectsql=selectsql+1
while not rs.eof
%>
<tr>
<td width="70" height="13"> <img src="../images/dot-2.gif" width="12" height="9"> <a href="hotel_list.asp?action=gomfkiqpl&city=<%=rs("hotel_city")%>&field=hotel_city" target=_blank><%=rs("hotel_city")%></a></td>
<td width="152" height="24"><a href="hotel_show.asp?id=<%=rs("id")%>" target="_blank"><%=rs("hotel_name")%></a></td>
<td width="70"><%=rs("hotel_type")%></td>
<td width="66"><%=rs("hotel_level")%></td>
<td width="60" align="center"><span class="delline"><%=rs("hotel_price")%>/RMB</span></td>
<td width="60" align="center"><%=rs("hotel_price_1")%>/RMB</td>
<td width="50" align="center"><a href="hotel_giveme.asp?id=<%=rs("id")%>&hotelname=<%=rs("hotel_name")%>&hoteladd=<%=rs("hotel_add")%>&hoteltype=<%=rs("hotel_type")%>" target="_blank"><img src="../images/giveme.gif"
border="0"></a></td>
</tr>
<tr bgcolor="#F7F7F7">
<td height="1" colspan="7"></td>
</tr>
<%
rs.movenext
wend
closers
%>
</table></td>
</tr>
</table>
<%call JGtable%>
<table width="755" border="0" align="center" cellpadding="0" cellspacing="0" class="table_1">
<tr align="center" bgcolor="#FFFFFF">
<td height="115" colspan="5" align="left">
<table width="150" border="0" cellspacing="0" cellpadding="0">
<tr>
<%
set rs=conn.execute("select top 5 id,pname,ppath from photos order by ptop desc,id desc")
selectsql=selectsql+1
while not rs.eof
%>
<td colspan="2"><table width="150" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="80" align="center"><a href="lookphotos.asp?id=<%=rs("id")%>" target="_blank"><img src="mfkiqpl/<%=rs("ppath")%>" width="140" height="80" border="0"></a></td>
</tr>
<tr>
<td height="30" align="center"><%=rs("pname")%></td>
</tr>
</table></td>
<%
rs.movenext
wend
closers
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -