<!--#include file="GzInc/Conn.asp"-->
<%
dim id1,id2
id=Request.ServerVariables("QUERY_STRING")
id1=replace(id,".html","")
id2=split(id1,"_")
	if id="" then
	call backurl("/")
	End if
a=id2(0)
b=id2(1)
%>
<%
Dim oRabout
Set oRabout= server.CreateObject("adodb.recordset")
sSql="select Top 1 * from [InfoHelp] where Id="& b
oRabout.open sSql,oConn,1,1
oConn.Execute("UPDATE [InfoHelp] SET HelpHits= HelpHits+1 where Id = "& b)

Dim alink,alinkpic
Set oRs = oConn.Execute("SELECT Id,Linktitle,LinkUrl,LinkContent FROM [InfoLink] where Linktype=0 and LinkState=1 ORDER BY LinkIndex DESC")
If Not oRs.EOF Then alink = oRs.GetRows
Set oRs = Nothing

Set oRs = oConn.Execute("SELECT Id,Linktitle,LinkUrl,LinkContent,LinkPic FROM [InfoLink] where Linktype=1 and LinkState=1 ORDER BY LinkIndex DESC")
If Not oRs.EOF Then alinkpic = oRs.GetRows
Set oRs = Nothing

Dim ahotraod
'线路热点
Set oRs = oConn.Execute("SELECT TOP 15 Id,Roadname,RoadMoney,RoadTop FROM [RoadList] where Roadtop=1  ORDER by Roadindex asc,Id DESC")
If Not oRs.EOF Then ahotraod= oRs.GetRows
Set oRs = Nothing
%>
<!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><%=oRabout(1)%>_<%=Web_Title%>_Powered by www.gaozhen.name</title>
		<meta http-equiv="X-UA-Compatible" content="IE=EmulateIE7" />
		<meta name="keywords" content="<%=Web_Keywords%>" />
		<meta name="description" content="<%=Web_Description%>" />
		<meta content="all" name="robots" />
		<meta name="author" content="雨楠,QQ：47329193,www.gaozhen.name" />
		<link type="text/css" href="/css/head.css" rel="stylesheet" />
		<link type="text/css" href="/css/help.css" rel="stylesheet" />
		<script type="text/javascript" src="/js/PlanCity.js"></script>
    	<base target="_top">
	</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%If Web_Js = 1 Then%><!--#include file="../Js.asp"--><%End If%>
<a name=top></a>
<div align="center"><!--#include file="../IndexHead.asp"--></div>
<%
select case a
case "about" call about()
case "friendlink" call friendlink()
case "weather" call weather()
case "mapsites" call mapsites()
End select
%>


<%sub weather()%>
<div id="header">
<div id="menu"><h1><font color="#FFFFFF">当前位置：</font><a href="/"><font color="#FFFFFF">主页</font></a> —> 天气预报</h1></div>
<div id="Contents">
<div class="llk">
<EMBED height=540 type=application/x-shockwave-flash width=700 
src=http://flash.weather.com.cn/wmaps/index.swf?url1=http:%2F%2Fwww.weather.com.cn%2Fweather%2F&amp;url2=.shtml&amp;id=yunnan&amp;from=yunnan 
base="http://flash.weather.com.cn/wmaps/" wmode="transparent" 
quality="high"></EMBED>
</div>
<div class="rrk">
		<div id="menu1"><h1>24小时在线免费咨询</h1></div>
		<div id="infos3">
<!--#include file="../myqq.asp"-->
		</div>
		
		<div id="menu1"><h1>热门线路立刻预订</h1></div>
		<div id="infos3">
			<ul>
			<%if Isarray(ahotraod) Then%>
			<%For i = 0 To UBound(ahotraod, 2)%>
			<li>·<a title="<%=ahotraod(1,i)%>" href="/booking/?bookroad_<%=ahotraod(0,i)%>.html"><%=left(ahotraod(1,i),10)%>..<span class="redbbb">￥<%=ahotraod(2,i)%>.00</span></a></li>
			<%Next
			End If%>
			</ul>
		</div>
</div>

</div>
</div>
<%end sub%>

<%sub mapsites()%>
<div id="header">
<div id="menu"><h1><font color="#FFFFFF">当前位置：</font><a href="/"><font color="#FFFFFF">主页</font></a> —> 旅游地图</h1></div>
<div id="Contents">
<div class="llk">
<iframe src="http://api.51ditu.com/iframe/newmapwindow.html?city=beijing&theme=blue&ettopic=placelist&showetd=1&showtools=1&showsmc=1&showovm=1&id=ttuxa" width="700" height="600"  SCROLLING="no" frameborder="0"></iframe>
</div>
<div class="rrk">
		<div id="menu1"><h1>24小时在线免费咨询</h1></div>
		<div id="infos3">
<!--#include file="../myqq.asp"-->
		</div>
		
		<div id="menu1"><h1>热门线路立刻预订</h1></div>
		<div id="infos3">
			<ul>
			<%if Isarray(ahotraod) Then%>
			<%For i = 0 To UBound(ahotraod, 2)%>
			<li>·<a title="<%=ahotraod(1,i)%>" href="/booking/?bookroad_<%=ahotraod(0,i)%>.html"><%=left(ahotraod(1,i),10)%>..<span class="redbbb"><%=FORMATCURRENCY(ahotraod(2,i))%></span></a></li>
			<%Next
			End If%>
			</ul>
		</div>
</div>

</div>
</div>
<%end sub%>

<%sub about()%>
<div id="header">
<div id="menu"><h1><%=oRabout(1)%></h1></div>
<div id="Contents" ><%=oRabout(3)%>
<br><p align=right>更新：<%=oRabout(4)%> 点击：<%=oRabout(5)%></p>
</div>
</div>
<%end sub%>

<%sub friendlink()%>
<div id="header">
<div id="menu"><h1><%=oRabout(1)%></h1></div>
<div id="Contents">
	<div class="llk">
		
		<ul>
		<%if Isarray(alinkpic) Then%>
		<%For i = 0 to UBound(alinkpic,2)%>
			<li><a target=_blank href="<%=alinkpic(2,i)%>" title="<%=alinkpic(3,i)%>"><img src="<%=alinkpic(4,i)%>" width=88 height=31></a></li>
		<%Next
		End If%>
		</ul>
		
		<ul>
		<%if Isarray(alink) Then%>
		<%For i = 0 to UBound(alink,2)%>
			<li><a target=_blank href="<%=alink(2,i)%>" title="<%=alink(3,i)%>"><%=alink(1,i)%></a></li>
		<%Next
		End If%>
		</ul>
		
	</div>
	<div class="rrk">
		<div id="menu1"><h1><font color="#FFFFFF">当前位置：</font><a href="/"><font color="#FFFFFF">主页</font></a> —> 申请友情链接</h1></div>
		<div id="infos1">
			<ul><form method="post" action="/Help/Indexv.asp?Reurl=joinlink">
				<li>网站名称：<input class="ipt1" name=a1></li>
				<li>网站类型：<select name=a2><option value="">类型</option><option value=0>文字</option><option value=1>图标</option></select></li>
				<li>网站地址：<input class="ipt2" name=a3></li>
				<li>网站logo：<input class="ipt2" name=a4></li>
				<li>网站介绍：<textarea class="ipt3" name="a5"></textarea></li>
				<li>站长姓名：<input class="ipt1" name=a6></li>
				<li>站长ＱＱ：<input class="ipt1" name=a7></li>
				<li><font color="#FF0000">认真填写：</font><input value="提交申请" class="ipt0" type=submit></li>
				</form>
				<li>本站图片链接：</li>
				<li><img src=/logo.gif></li>
				<li><textarea class="ipt4" name="link" cols="1" rows="1" onfocus="this.select();"><a target=_blank href='http://<%=Web_Url%>/' title='<%=Web_Title%>'><img src='http://<%=Web_Url%>/logo.gif' width='88' height='31'></a></textarea></li>
				<li>本站文字链接：</li>
				<li><textarea class="ipt4" name="link" cols="1" rows="1" onfocus="this.select();"><a target=_blank href='http://<%=Web_Url%>/ title='<%=Web_Title%>'><%=Web_Title%></a></textarea></li>
			</ul>
		</div>
	</div>
</div>
</div>
<%end sub%>
<!--#include file="../end.asp"-->
</body>
</html>