<!--#include file="inc/config.asp"-->
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/route_func.asp"-->
<%
const recpage=30
dim id,ctitle
if(request.QueryString("id")<>"") then
	id=Clng(request.QueryString("id"))
else
	id=0
end if
if(id>0) then
	set rs=conn.execute("select id,Title from t_route_catalog where id="&id&" order by id asc")
	if not rs.eof then
		ctitle=rs(1)
	end if
	rs.close
	set rs=nothing
end if
if not isempty(request.QueryString("page")) then 
currentpage=Clng(trim(request.QueryString("page")))
else currentpage=1
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=ctitle%>-旅游线路-<%=SiteName%></title>
<meta name="description" content="description" />
<meta name="keywords" content="keywords" />
<link href="style/global.css" rel="stylesheet" type="text/css" />
<link href="style/list.css" rel="stylesheet" type="text/css" />
<script type="text/javascript" src="js/common.js"></script>
<script type="text/javascript" src="js/marquee.js"></script>
<script language="javascript">
function goto(frm)
{
	var gourl ="?id=<%=id%>&";
	gourl += "page=" + (frm.page.value);
     var hid=parseInt(frm.hid.value);
	 if(parseInt(frm.page.value)>hid||frm.page.value<=0){
	 alert("错误！请确定你输入的数字在1-"+hid+"之间");
	 return false;
	 }
	window.location.href(gourl);
}</script>
</head>

<body>
<!--#include file="templet/head.htm"-->
<table width="960" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td class="postion">现在位置：<a href="/">首页</a> -&gt; <a href="routes.asp">旅游线路</a> -&gt;<%=ctitle%></td>
  </tr>
</table>
<table width="960" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="228" valign="top">
    <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="border_yellow">
      <tr>
        <td width="88%" class="topic">酒店分类</td>
      </tr>
      <tr>
        <td bgcolor="#FFFFFF" class="pad5">
        <div class="routes_txt">
        	<ul>
						<li><a href="?id=0" <%if(id=0) then response.Write(" style=""font-weight:bold;""") end if%>>全部</a></li>
						<%
            set rs=conn.execute("select id,title from t_route_catalog")
            while not rs.eof
            %>
            <li><a href="?id=<%=rs(0)%>"<%if(id=rs(0)) then response.Write(" style=""font-weight:bold;""") end if%>><%=rs(1)%></a></li>
            <%
              rs.movenext
            wend 
            rs.close
            set rs=nothing
            %>
          </ul>
          </div>
        </td>
      </tr>
    </table>
    
      <div class="br"></div>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="7"><img src="images/topic_l.gif" width="7" height="32" /></td>
          <td width="213" background="images/topic2_bg.gif"><div class="right"><a href="/routes.asp"><img src="images/more.gif" width="49" height="13" border="0" /></a></div>
            <div class="bar_text3">热门线路</div></td>
          <td width="7"><img src="images/topic_r.gif" width="7" height="32" /></td>
        </tr>
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td style="border-left:1px solid #B8D5E3; border-right:1px solid #B8D5E3;"><div class="routes_txt">
            <ul>
              <%
							set rs=conn.execute("select top 6 id,Title,Price,Hits from t_route where IsRem=1")
							while not rs.eof
							%>
              <li><a href="/routes_show.asp?id=<%=rs(0)%>" class="STYLE20"><%=rs(1)%></a><span class="STYLE1"> ￥<%=rs(2)%>元/人</span></li>
              <%
								rs.movenext
							wend 
							rs.close
							set rs=nothing
							%>
            </ul>
          </div></td>
        </tr>
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="7"><img src="images/b_l.gif" width="7" height="6" /></td>
          <td background="images/b_bg.gif"></td>
          <td width="7"><img src="images/b_r.gif" width="7" height="6" /></td>
        </tr>
    </table>
    <div class="br"></div>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="7"><img src="images/topic_l.gif" width="7" height="32" /></td>
          <td width="213" background="images/topic2_bg.gif"><div class="right"><a href="/hotel.asp"><img src="images/more.gif" width="49" height="13" border="0" /></a></div>
            <div class="bar_text3">推荐酒店</div></td>
          <td width="7"><img src="images/topic_r.gif" width="7" height="32" /></td>
        </tr>
        <tr>
          <td colspan="3" style="border-left:1px solid #B8D5E3; border-right:1px solid #B8D5E3;"><div class="routes_txt">
            <ul>
              <%
							set rs=conn.execute("select top 6 id,Title,MinPrice from t_hotel where IsRem=1")
							while not rs.eof
							%>
              <li><a href="/hotel_show.asp?id=<%=rs(0)%>" class="STYLE20"><%=rs(1)%></a><span class="STYLE1"> ￥<%=rs(2)%>元</span></li>
              <%
								rs.movenext
							wend 
							rs.close
							set rs=nothing
							%>
            </ul>
          </div></td>
        </tr>
        <tr>
          <td width="7"><img src="images/b_l.gif" width="7" height="6" /></td>
          <td background="images/b_bg.gif"></td>
          <td width="7"><img src="images/b_r.gif" width="7" height="6" /></td>
        </tr>
    </table>
    </td>
    <td width="10">&nbsp;</td>
    <td valign="top" class="list_brd">
    <table width="100%" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td class="list_topic"><div class="list_txt"><%=ctitle%></div></td>
        </tr>
      <tr>
        <td>
        <%
					sql="select count(*) from t_route where 1=1"
					if(id>0) then
						sql=sql&" and ClassId="&id
					end if
					set rs=server.createobject("adodb.recordset")
					rs.open sql,conn,3,1
					allrec=rs(0)
					totalpage=int((allrec+recpage-1)/recpage)
					rs.close
					set rs=nothing
					
					%>
        <div class="list_routes_txt">
          <ul>
            <%
						set rs=server.createobject("adodb.recordset")
					sql="select top "&recpage&" id,Title,Price,OrderNum,Color from t_route where id >=(select max(id) from (select top "&(recpage*(currentpage-1)+1)&" id from t_route where 1=1"
					if(id>0) then
						sql=sql&" and ClassId="&id
					end if
					sql=sql&" order by id asc) as t)"
					if(id>0) then
						sql=sql&" and ClassId="&id
					end if
					sql=sql&" order by id asc "
					rs.open sql,conn,3,1		
					while not rs.eof
						%>
          <li>
              <div class="title"><a href="routes_show.asp?id=<%=rs(0)%>" style="color:<%=rs(4)%>"><%=rs(1)%></a></div>
              <div class="price">￥<%=rs(2)%>元/人</div>
              <div class="pnum">预定人数：<span class="red"><%=rs(3)%></span>人</div>
            </li>
          <%
						rs.movenext
					wend 
					rs.close
					set rs=nothing
					%>
          </ul>
        </div></td>
      </tr>
    </table>
   	<div align="center">
<form name="form1" method="post" action="" style="margin:0 0 0 0">
<%
        dim n,p
        n=currentpage+1
        p=currentpage-1
        if p>0then
        response.write("["&"<a href='?id="&id&"&page="&cstr(p)&"'>上一页</a>]&nbsp;&nbsp;&nbsp;")
        else response.write("上一页&nbsp;&nbsp;&nbsp;")
        end if 
        if (n-1)*recpage>=allrec then 
        response.write("下一页" )
        else
        response.Write("["&"<a href='?id="&id&"&page="&cstr(n)&"'>下一页</a>]")
        end if
        response.write("&nbsp;共"&allrec&"条&nbsp;")
        response.Write("&nbsp;共"&totalpage&"页&nbsp;")
        response.Write("&nbsp;第"&currentpage&"页&nbsp;")
        %>
<input type="hidden" name="hid" value="<%=totalpage%>">
&nbsp;&nbsp;跳至
<input name="page" type="text" size="5" onChange="goto(this.form)" style="border:1px solid #000000;height:14px ">
页
<input type="button" name="Button22" value="Go->" style="font-size:12px ;border:1px solid #000000;height:18px ">
</form>
</div>
		</td>
  </tr>
</table>
<!--#include file="templet/root.htm"-->
</body>
</html>
<%
call connclose()
%>