<%MDBname="news"%> <% 'on error resume next set conn=server.createobject("ADODB.CONNECTION") 'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(""&MDBpath&"../databases/data/"&MDBname&".asp") '如果你的服务器采用较老版本Access驱动,请用下面连接方法 connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath(""&MDBpath&"../databases/data/"&MDBname&".asp") conn.open connstr %> <% newshu=2 '每个分类显示最新文章数 toplen=10 toplen_wz=13 chalen=2 search=search&"
" search=search&"

" search=search&"" search=search&"" search=search&"" set rs=server.CreateObject("ADODB.RecordSet") set rs_info=server.CreateObject("ADODB.RecordSet") set rs_yl=server.CreateObject("ADODB.RecordSet") set rs_t=server.CreateObject("ADODB.RecordSet") function Title(content) if content<>"" then Title=content Title=replace(Title,"[加粗]","") Title=replace(Title,"[倾斜]","") Title=replace(Title,"[下划线]","") Title=replace(Title,"[删除线]","") if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" if instr(1,Title,"",1)<>0 then Title=Title+"" Title=replace(Title,"[红色]","") Title=replace(Title,"[蓝色]","") Title=replace(Title,"[绿色]","") Title=replace(Title,"[紫色]","") Title=replace(Title,"[酱色]","") Title=replace(Title,"[橙色]","") if instr(1,Title,"0 then Title=Title+"" Title=replace(Title,"[建议]","[建议]") Title=replace(Title,"[注意]","[注意]") Title=replace(Title,"[下载]","[下载]") Title=replace(Title,"[公告]","[公告]") Title=replace(Title,"[转载]","[转载]") Title=replace(Title,"[焦点]","[焦点]") Title=replace(Title,"[社会]","[社会]") Title=replace(Title,"[推荐]","[推荐]") Title=replace(Title,"[原创]","[原创]") end if End function function Site_Link(showType,showNum) dim link_i,link_ii link_i=0 link=0 if showType=1 then sql="select top "&showNum&" * from SiteLink where isLogo=1 order by DateTime" Rs.open sql,conn,1,1 if not(Rs.eof and Rs.bof) then do while not Rs.eof Site_Link = Site_Link & ""&vbcrlf link = link + 2 if link mod 6 =1 then Site_Link=Site_Link&"
" end if Rs.movenext loop end if rs.close else sql="select top "&showNum&" * from SiteLink where isLogo=0 order by DateTime" Rs.open sql,conn,1,1 if not(Rs.eof and Rs.bof) then do while not Rs.eof Site_Link = Site_Link & ""&rs("mySiteName")&""& vbcrlf link_i = link_i + 1 if link_i mod 8 =0 then Site_Link=Site_Link&"
" end if Rs.movenext loop end if rs.close end if end function strSite_Link_Text=Site_Link(0,8) strSite_Link_Logo=Site_Link(1,24) i=0 sql="select top 30 title,id,dj,date from info where date>Now()-7 order by hits desc" rs.open sql,conn,1,1 if rs.eof then top="还没有文章" else do while not rs.eof filetop=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) if instr(rs("Title"),"0 then toplen1=toplen+20 if len(rs("Title"))>toplen1 then titley=left(rs("Title"),toplen1)&"
"&"..." else titley=rs("Title")&"
" end if else if len(rs("Title"))>toplen then titley=left(rs("Title"),toplen_wz)&"" else titley=rs("Title") end if end if if rs("dj")=6 then Txtop=Txtop&"·"&Title(titley)&"
" else Txtop=Txtop&"·"&Title(titley)&"
" end if i=i+1 if i>=30 then exit do rs.movenext loop end if rs.close '今日导读开始 i=0 sql="select top 12 id,title,tid,date from info order by date desc" rs.open sql,conn,1,1 if rs.eof then infolist="·还没有文章" else for i=1 to 12 if rs.eof then exit for rs_t.open "select * from infotype where id="&rs("tid"),conn,1,1 if not rs_t.EOF then TN=split(rs_t("tname"),"|") end if rs_t.close filetop=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) datetime=year(rs("date"))&"_"&month(rs("date"))&"_"&day(rs("date"))'时间格式:年/月/日 datetime1=month(rs("date"))&"/"&day(rs("date"))'时间格式:月/日 '今日导读标题断行开始 if len(rs("Title"))>17 then titley=left(rs("Title"),17)&"..." else titley=rs("Title") end if '今日导读标题断行结束 infolist=infolist&""&lm&"·"&Title(titley)&"
" rs.movenext next end if rs.close '今日导读结束 rs2=conn.execute("select count(*) from info where year(date)&month(date)&day(date)=year(date())&month(date())&day(date())") shuinfo=rs2(0) Dim list_4(20) Dim list_5(20) Dim list_6(20) sql="select * from specialx where tj=1 and spics<>''" rs.open sql,conn,1,1 if NOT rs.EOF then do while not rs.eof kk=kk+1 SN=split(rs("sname"),"|") for i = 0 to ubound(SN)-1 next SSY_name=SN(0) list_4(kk)=""&SSY_name&"
"&rs("introduce")&"" list_5(kk)="" rs.MoveNext loop end if rs.close sql="select * from specialx where tj=1 and spics=''" rs.open sql,conn,1,1 if NOT rs.EOF then do while not rs.eof tt=tt+1 SN=split(rs("sname"),"|") for i = 0 to ubound(SN)-1 next SSY_name=SN(0) list_6(tt)=""&SSY_name&"" rs.MoveNext loop end if rs.close rs.open "select * from infotype ",conn,1,1 if not rs.eof then ts=rs("ts") TN=split(rs("tname"),"|") TI=split(rs("ts"), ",") for i = 0 to ubound(TN)-1 if i=ubound(TN)-2 and ubound(TN)>1 then TTY_id=TI(i) TTY_name=TN(i) end if all_type_top_id=TI(i) all_type_name=TN(i) thistype=thistype & "-> "&TN(i)&"" thistitle=thistitle & " - "&TN(i)&"" next end if rs.close i=0 sql="select * from info where pic<>'' and commend='1' order by date desc" rs.open sql,conn,1,1 if rs.eof then image="还没有图片文章" else do while not rs.eof if instr(rs("Title"),"0 then toplen1=toplen+20 if len(rs("Title"))>toplen1 then titley=left(rs("Title"),toplen1)&"
"&"..." else titley=rs("Title")&"
" end if else if len(rs("Title"))>toplen then titley=left(rs("Title"),toplen)&"" else titley=rs("Title") end if end if fileimg=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) noid=noid&" and id<>"&rs("id")&"" i=i+1 if rs("dj")=6 then image=image&"" else image=image&"" end if pic=rs("pic") pic=Replace(pic, "../../", "") image=image& "
"&titley&"
" if i=6 then exit do rs.movenext loop end if rs.close '公告开始 sql="select top 1 id,newsname,addtime,newsnote from Announce order by addtime desc" rs.open sql,conn,1,1 if rs.eof then infolist="·还没有公告" else do while not rs.eof Announce=Announce&""&rs("newsnote")&"["&rs("addtime")&"]
" rs.movenext loop end if rs.close '图文混排开始 i=0 sql="select * from info where pic<>'' and commend='1' order by date desc" rs.open sql,conn,1,1 if rs.eof then DefaultPic="还没有图片文章" else do while not rs.eof infoy=left(rs("info"),108)&"..." if instr(rs("Title"),"0 then if len(rs("Title"))>10 then titley=left(rs("Title"),toplen1)&"
"&"..." else titley=rs("Title")&"" end if else if len(rs("Title"))>1 then titley=left(rs("Title"),16)&"..." else titley=rs("Title") end if end if fileimg=year(rs("date"))&month(rs("date"))&day(rs("date"))&hour(rs("date"))&minute(rs("date"))&second(rs("date")) noid=noid&" and id<>"&rs("id")&"" i=i+1 if rs("dj")=6 then DefaultPic=DefaultPic&"" else DefaultPic=DefaultPic&"" end if pic=rs("pic") pic=Replace(pic, "../", "") DefaultPic=DefaultPic&"
"&Titley&"

  "&infoy&"[详细报道]" if i>=1 then exit do rs.movenext loop end if rs.close '图文混排结束 list=list&"" rs.open "select * from infotype where tj=1 order by id",conn,1,1 if NOT rs.EOF then allshu=rs.recordcount Dim list_1(20) Dim list_2(20) Dim list_3(20) do while NOT rs.EOF ii=ii+1 list=list&""&split(rs("tname"),"|")(rs("tj")-1)&"|" list_1(ii)=""&split(rs("tname"),"|")(rs("tj")-1)&"" list_2(ii)="

更多内容 ...
" i=0 sqqq_yl="" sql_yl="select * from infotype where ts like '"&rs("ts")&"%'" rs_yl.open sql_yl,conn,1,1 if not rs_yl.eof then do while not rs_yl.eof sqqq_yl=sqqq_yl& " or tid="&rs_yl("id")&"" rs_yl.MoveNext loop end if rs_yl.close rs_info.open "select id,title,dj,date from info where tid="&rs("id")&""&sqqq_yl&" order by id desc",conn,1,1 if NOT rs_info.EOF then do while not rs_info.eof fileming=year(rs_info("date"))&month(rs_info("date"))&day(rs_info("date"))&hour(rs_info("date"))&minute(rs_info("date"))&second(rs_info("date")) if instr(rs_info("Title"),"0 then chalen1=chalen+20 if len(rs_info("Title"))>chalen1 then titlex=left(rs_info("Title"),chalen1)&""&"..." else titlex=rs_info("Title")&"" end if else if len(rs_info("Title"))>chalen then titlex=left(rs_info("Title"),chalen)&"..." else titlex=rs_info("Title") end if end if if rs_info("dj")=6 then list_3(ii)=list_3(ii)&"["&split(rs("tname"),"|")(rs("tj")-1)&"]"&Title(titlex)&""&datetime1&"
" else list_3(ii)=list_3(ii)&"["&split(rs("tname"),"|")(rs("tj")-1)&"]"&Title(titlex)&""&datetime1&"
" end if i=i+1 if i>=newshu then exit do rs_info.movenext loop end if rs_info.close rs.MoveNext loop end if rs.close set rs=nothing set rs_yl=nothing set rs_info=nothing conn.close set conn=nothing%> 香港文汇报珠三角新闻网_梅州鸿都花园翔龙居

您的位置:首页 > 广东新闻 > 梅州

 

梅州鸿都花园翔龙居

 

wwpprd.com 作者:wwpprd.com 来自:文汇报 点击:394 时间:2006-3-25


鸿都花园4.5万平米超大水景园林,56%的绿化率,180余种珍稀植被花卉,视野之内,一片郁郁葱葱,成为城市中央的「天然大氧吧」。亭台,流水,雕塑,十步一景,步移景换,更带给人参与其中的乐趣。

文:本报珠三角新闻中心记者 徐红

 

 短短5年,鸿艺集团把梅州一片偏僻冷清的土地,演绎为「世界客都」最精华的城市地域之一,鸿都花园昂首傲踞;短短5年,鸿都花园已发展成为粤东住宅项目中的指针建筑,小区的成熟美韵众人皆知;短短5年,鸿艺地产缔造了人居奇迹,更期冀打造与国际接轨的顶级住宅。

 

 鸿都花园压轴巨作——翔龙居,作为鸿都花园的龙脉源头、风水圣地,注定将成为梅州人居的新里程碑;从产品质量到小区生活,翔龙居让您感受生活的真谛。

 

风水圣地

 

 翔龙居所占地块,是鸿都花园最后一块,位处65万平米大小区的中央核心,无论景观视野还是人文气韵,皆为最佳。

 

 在风水上,翔龙居处于鸿都花园龙门灯、天子门、风水球、福字碑、状元台构筑的中轴龙脉的源头,纳聚天地精华,成为全城难以再寻的风水圣地。国际养生大师朱鹤亭在参观了鸿都花园后,对翔龙居的风水给予了高度的肯定,认为在此居住,不仅可以陶冶人的性情,还可以开拓人的心境,生活祥和如意!

 

 面对如此尊贵地块,鸿艺集团倾5年之功,召聚国际团队,融汇西方美学与东方智慧,在大地上精雕细琢,每个细节都力求完美。

 

规划超前

 

 翔龙居实践的是「规划超前」的建设理念。自开发建设起,翔龙居就以尖端的行业标准苛求自己,力求达到「同步国际」的住宅质量。

 

 翔龙居采用外方内圆、坐北朝南的布局,继承中国传统建筑的精髓。坐北朝南,使采光面最大,同时保障翔龙居每一户的通风更顺畅;内圆的格局,使得活动的公共空间没有死角,人们能更好地在广场上沟通、交流,内心感到愉悦和快乐。

 

 翔龙居拥有梅州独一无二的五星级酒店入户大堂。华丽的大厅,精美的壁画,让您在美的熏陶中,卸下一天的繁琐和劳累,以另一种心情开始享受归家的幸福。

 

 270度豪华观景电梯同样开梅州先河。通透明亮的梯箱,改变了电梯封闭局促的缺点,让您每一次出门入户,都能以轻松的心情,享受超大弧形的观景窗带给您的一幅春华秋实的壮丽美景!

 

 如果以时间跨度来衡量住宅的价值,翔龙居已领先梅州地产十年。前来视察的国家建设部专家也不禁感叹:这样的规划和质量,在发达地区也是众人追捧的产品啊!

 

超凡气度

 

 翔龙居集鸿都花园5年人居精粹,以创新之举,筑就出超凡气度和完美舒适度的卓越府邸。

 

 别墅式错层府邸将别墅的形态原封不动移入高层楼宇,在高处,享受到别墅的居住质量,同时又拥有了地面别墅无法享受的广阔视野。超大中空客厅设计,纵深舒展至6米,配置全落地玻璃窗,邀自然美景入室,更涵纳一室灿烂阳光。

 

 6米超高大露台更是一种前所未见的创新,整面墙体被采光完全代替,高度加强了居室的采光面积。同时,露台巧妙过渡室内外空间,将室外的自然引入室内,又将室内的生活尺度无限扩张到室外,20余平米的大露台上,无论观景,聚会……都能带给您与家人别样的生活乐趣。

 入户花园,设置在客厅与入户门之间,将私家花园引入了家居环境中,推开门就可以看到葱茏的植物花草,甚至鸟雀欢闹,拥有了独门独院有天有地的庭院感受。不仅如此,入户花园更赋予了居室环境健康生态环保的功能,提升了居者生活的质量和内涵。

 

「五心」服务

 

 鸿都花园.翔龙居的完美不光体现在对产品质量的苛刻要求上,还表现在对物业管理的严格规范中。现针对翔龙居的至尊质量,物管公司更研发出了十二重智能安防系统和「五心级」国际管家式服务,来全面呵护居者一家三代的生活。

 

 十二重的高智能安防系统,以别墅安防标准配置:第一重,小区界墙处采用红外线边界防越系统;第二重,小区出入口实行全天候值班监控;第三重,外来访客管理系统;第四重,机动车出入小区实行IC卡智能管理;第五重,保安24小时小区巡逻;第六重,保安流动性巡察管理;第七重,小区360度全方位摄像监控系统;第八重,生态车库安全防范系统;第九重,车辆自动识别智能化管理系统;第十重,单元非接触式IC卡智能门禁系统;第十一重,室内可视对讲系统;第十二重,室内紧急求助按钮……人力与智能化相结合的重重安防,让住户和家人真切享受着安全无忧的幸福生活!

 

 「五心级」国际管家服务,为业主提供最贴心的专业照顾,如:物业公司与银行联合推出「鸿都花园一卡通」,托收物业、水、电、气等相关费用,减少业主缴费的繁琐程序;设立住户服务平台,并保证在24小时内对住户的问题予以答复;各组团配备水、电、气和电梯等专业技术人员,24小时随叫随到;根据业主个别需求提供相应的服务……等等。

 

 「好房子,享受生活一辈子!」这句质朴的话,让我们看到了鸿都花园.翔龙居对居者美好生活的祝福,更看到翔龙居打造美好生活的拳拳之心!

 

 售楼电话:075321588222158823

 网址:www.hongyigroup.com

鸿都花园翔龙居小资料

位置:梅州市彬芳大道中鸿都路鸿都花园

 座数:14

 楼层:12---15层小高层

 单位数目:266

 单位面积:125—315平方米

 间隔:三房平层、三房复式、四房错层、五房二厅平层、五房三厅平层、五房二厅复式

 设施:银行、超市、邮局、游泳池、网球场、桌球室、三人足球场,排球场、乒乓球场、健身室、阅读室、儿童游戏室、卡拉OK室等

 入伙日期:20066

 发展商:广东鸿艺集团有限公司

 咨询电话:0753-2158822 2158823

 

品牌威水史

 

广东鸿艺集团,梅州房地产开发的领跑者。先后成功开发了鸿都大厦、鸿都苑、鸿运新村、鸿都世纪广场等样版工程,并成功打造出粤东地区唯一的「国家级康居示范小区」鸿都花园,在地产界树立起「鸿艺品牌」。

 

 目前,鸿艺集团,已从原来单一的地产开发商转向了全面的城市运营商,并以雄厚的实力,崇高的社会责任感,规划建设中国首个客天下旅游产业园。

 

责任编辑:cnred 文章页数第[1]页 

页面功能 【我来说两句】【字体: 】【打印】 【关闭

相 关 连 接
网 友 评 论

141414a :
   一场颠覆无产阶级主人的灾难性事件,在祖国大陆片地开花结果。他将迅速威胁政府政权马上直接崩溃瓦解。不信到时看吧。。。。。。.http://cache.tianya.cn/publicforum/Content/house/1/60624.shtml 我是79年     打越南的英雄,现在好后悔! 现在我要杀出一条血路来....

璇:
   在梅州读书这么多年,第一次去看这里聚集最多达官贵人的地方,真的让我大开眼界~~

周:
   恩,我去过那里参观,真的挺不错的~~

发 表 评 论
您的大名:(点击这里注册)
友情提醒:评论请限制在100字以内,有长篇大论欢迎到论坛发表:)
 

综合新闻|广东新闻|专题新闻

>> 本类热点新闻

·涉兴宁矿难数官员被拘
·梅州鸿都花园翔龙居
·金利来兴建梅州时尚街
·梅州「山洽会」 助粤产业转
·十一.五商机之梅州篇.梅州
·兴宁矿难家属每户获赔20万
·粤东拟30亿建旅游产业园
·泰总理他信 今梅州寻根
·梅州联会喜迎家乡领导
·梅州联会110周年千人欢宴
·「山洽会」首签近700亿投
·嘉应商会梅州「母亲楼」落成
·中总妇委会30人访梅州
·第四届「山洽会」今梅州开幕
·梅州副市长郑少伟访梅联
·梅县辟粤东黄金旅游线
·工业界50人赴梅州考察
·梅州联会捐二千万回乡兴学
·梅州政协拜访客属乡亲
·梅州乡贤倡建客属姐妹社团

 

合作媒体

合作及广告联系电话: 020-83825987


文汇报简介 | 广告服务 | 读者联谊 | 在线订报 | 在线投稿 | 站内公告 | 设为首页 | 收藏本站
新闻中心地址:广州市沿江中路323号临江国际大厦15楼 电话:020-83825987  传真:020-83817466
网管信箱:webmaster@wwpprd.com  编辑信箱:editor@wwpprd.com
香港文汇报珠三角新闻网 版权所有©Copyright 2004 www.wwpprd.com
来访统计:  技术支持:中国红电子商务频道