<% const recpage=20 dim id,ctitle,key 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 order by id asc") if not rs.eof then ctitle=rs(1) end if rs.close set rs=nothing end if key=request.QueryString("key") if(key<>"") then key=replace(key,"'","") key=replace(key,"0x","") end if if not isempty(request.QueryString("page")) then currentpage=Clng(trim(request.QueryString("page"))) else currentpage=1 end if %> 张家界旅游线路 凤凰张家界旅游线路,,张家界跟团游,长沙到张家界跟团游,张家界旅游线路报价经济实惠!
选择湖南西部张家界国旅的十大理由
怎样选择张家界旅行社高品质旅游
张家界散客跟团游的十大优势
选择湖南西部张家界国旅的好处
通过网络怎样报名张家界旅游
张家界必游精华景点及旅游攻略
现在位置: 首页 -> 张家界旅游线路 -> 线路搜索 打印本页 加入收藏
相信品牌的力量 湖南西部张家界国旅
国旅集团采购旅游资源 经济实惠
全国百强旅行社 湖南张家界品牌大社
湖南西部张家界国旅诚信服务23年
7*24小时专属人工服务聆听您的来电
全程旅游产品纯玩品质无购物
开具正规旅行社旅游服务发票
截止目前高品质服务3121387位游客
线路搜索
<% sql="select count(*) from t_route where 1=1" if(id>0) then sql=sql&" and ClassId="&id end if if(key<>"") then sql=sql&" and Title like '%"&key&"%'" 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 %>
    <% set rs=server.createobject("adodb.recordset") sql="select top "&recpage&" id,Title,Price,OrderNum,Color,Photo,RelateKey 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 if(key<>"") then sql=sql&" and Title like '%"&key&"%'" end if sql=sql&" order by id asc) as t)" if(id>0) then sql=sql&" and ClassId="&id end if if(key<>"") then sql=sql&" and Title like '%"&key&"%'" end if sql=sql&" order by id asc " rs.open sql,conn,3,1 while not rs.eof %>
  • <%=rs(1)%>
    线路特色:<%=rs(6)%>......[查看详细]
    <%=rs(2)%>
  • <% rs.movenext wend rs.close set rs=nothing %>
<% dim n,p n=currentpage+1 p=currentpage-1 if p>0then response.write("["&"上一页]   ") else response.write("上一页   ") end if if (n-1)*recpage>=allrec then response.write("下一页" ) else response.Write("["&"下一页]") end if response.write(" 共"&allrec&"条 ") response.Write(" 共"&totalpage&"页 ") response.Write(" 第"¤tpage&"页 ") %>   跳至
<% call connclose() %>