<%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_conn_STRING Recordset1.Source = "SELECT * FROM room, hotel WHERE room.fav = '是' and hotel.position='是'and room.r_hotel_id = hotel.id order by hotel.id desc" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Recordset2 Dim Recordset2_numRows Set Recordset2 = Server.CreateObject("ADODB.Recordset") Recordset2.ActiveConnection = MM_conn_STRING Recordset2.Source = "SELECT * FROM news WHERE tjnews = '是' ORDER BY id DESC" Recordset2.CursorType = 0 Recordset2.CursorLocation = 2 Recordset2.LockType = 1 Recordset2.Open() Recordset2_numRows = 0 %> <% Dim Recordset3 Dim Recordset3_numRows Set Recordset3 = Server.CreateObject("ADODB.Recordset") Recordset3.ActiveConnection = MM_conn_STRING Recordset3.Source = "SELECT * FROM line, g_line WHERE g_line.fav = '是' and line.id = g_line.l_line_id AND line.linetype = '散客'" Recordset3.CursorType = 0 Recordset3.CursorLocation = 2 Recordset3.LockType = 1 Recordset3.Open() Recordset3_numRows = 0 %> <% Dim rs2 Dim rs2_numRows Set rs2 = Server.CreateObject("ADODB.Recordset") rs2.ActiveConnection = MM_conn_STRING rs2.Source = "SELECT city FROM hotel GROUP BY city" rs2.CursorType = 0 rs2.CursorLocation = 2 rs2.LockType = 1 rs2.Open() rs2_numRows = 0 %> <% Dim Recordset4 Dim Recordset4_numRows Set Recordset4 = Server.CreateObject("ADODB.Recordset") Recordset4.ActiveConnection = MM_conn_STRING Recordset4.Source = "SELECT * FROM whua ORDER BY s_id DESC" Recordset4.CursorType = 0 Recordset4.CursorLocation = 2 Recordset4.LockType = 1 Recordset4.Open() Recordset4_numRows = 0 %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = 12 Repeat2__index = 0 Recordset2_numRows = Recordset2_numRows + Repeat2__numRows %> <% Dim Repeat4__numRows Dim Repeat4__index Repeat4__numRows = 4 Repeat4__index = 0 Recordset4_numRows = Recordset4_numRows + Repeat4__numRows %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 12 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> <% Dim Repeat3__numRows Dim Repeat3__index Repeat3__numRows = 8 Repeat3__index = 0 Recordset3_numRows = Recordset3_numRows + Repeat3__numRows %> 黄山康辉旅游网-huangshanCCT|黄山康辉旅行社|黄山旅游服务|黄山旅游信息|黄山会议接待|黄山酒店预订|安徽黄山商务旅游……
·【关于调整黄山风景区部分门票价格优惠政策通知】。。。
　　黄山，无山不峰， 无峰不石，无石不松，无松不奇； 山情水景，奇松怪石，变化万千，令人目不暇接。黄山汇奇松、怪石、云海、温泉“四绝”于一体，是大自然造化中的奇迹。1990年被联合国教科文组织列入受世界保护的人类自然遗产目录，已成为全人类的瑰宝。
·黄山旅游服务中心· 黄山美丽风光 · 黄山旅游帮助中心
黄 山 土 特 产
经典线路推荐
　　

您是否已经厌倦了都市的喧嚣，又或者江湖的争斗让您身心俱疲
　　黄山之行都能给你带来意外的惊喜
　　---黄山康辉旅游网，您还在犹豫什么呢？！

黄山一日游 　　　　　　　　　黄山两日游　　　　　　　黄山、翡翠谷、九龙瀑三日游
<% While ((Repeat3__numRows <> 0) AND (NOT Recordset3.EOF)) %> <% Repeat3__index=Repeat3__index+1 Repeat3__numRows=Repeat3__numRows-1 Recordset3.MoveNext() Wend %>
西递宏村一日游玩
　　　　九华山二日游
预订
酒 店 信 息

·黄山酒店信息。让你安心出门游玩。无论走到哪都有家的感觉````

黄山： 狮林大酒店 ★★★★ 北海宾馆 ★★★★西海饭店★★★★ 更多>>>

黄山市区：高尔夫大酒店 ★★★★★ 华山宾馆 ★★★★ 黄山国脉大酒店 ★★★★
<% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %>
  华辰大酒店 ★★★ 花溪饭店 ★★★ 丽园大酒店 ★★★ 更多>>>
黄 山 特 产
·黄山的土特产有黄山毛峰、祁门红茶、歙砚、徽墨 ...
·　黄山毛峰 ·　祁门红茶
·　太平猴魁 ·　徽州贡菊
·　屯 绿- ·　香 菇
·　徽 墨 ·　歙 砚

地 图 导 航

欢迎进入黄山圣境...

·黄山的景点多不胜数，一个个去看吧...
旅 游 搜 索


:
知道怎么来黄山吗，查一查吧……
　·  列车 时刻 查询
　·  航班 时刻 查询
　·  汽车 时刻 查询
　·  黄山 景点 地图
　·  黄山 景点 里程
　·  黄山 客运 索道
　·  黄山 日出 日落

　·   今日外汇牌价

　·   各地电视节目
　·   万年历查询表
　·   松谷景区地图
　·   温泉景区地图
　·   北海景区地图
　·   玉屏景区地图
　·   云谷景区地图
·
 白云景区地图
·
 黄山风景区地图
·
 主要旅游景点位置简图
　·   徽 菜 风 味
　·   地 方 小 吃
　·   花 果 飘 香
 
联系方式
李先生
Tel
 0559-2152856 13855989288
Fax
 0559-2542857
441020547
hsaabbcc@hotmail.com
QQ群组咨询
 31851869
※ 友 情 链 接
·
·
    · · ·
·
┊ 关于我们 ┊ 联系我们 ┊ 汇款须知 ┊ 收藏本站 ┊ English ┊
 
黄山康辉旅游网
 
地址：安徽省黄山市屯溪区前园东路2号 邮编：245000
 
 
电话：0559-2152856、2542856、3361070、13855989288　传真：0559-2542857