<%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 来自:文汇报 点击:0 时间:2008-7-14


■自力村碉楼群

 开平位于珠江三角洲西南部,是全国著名的侨乡。开平过去因侨而闻名,如今更因璀璨的华侨历史文化而名扬四海。20076月,见证19世纪中至20世纪初这段华侨历史的中西合璧独特建筑「开平碉楼与村落」被联合国教科文组织列入《世界遗产名录》,成为目前中国最年轻的、广东第一个世界遗产项目!近在咫尺的世界遗产令无数港人为之神往。如果你祖籍五邑,碉楼跟你或许有千丝万缕的关系……

 

本报记者 刘慧华、资料提供:开平市旅游局

 

碉楼——令人震撼的艺术长廊

 

 走进开平碉楼,寻找一段沧桑的华侨历史。开平碉楼始建于明末清初,那时与华侨并无关系。碉楼大规模兴建于20世纪初,当时中国社会兵荒马乱,盗贼猖獗。为了防洪防匪,保护侨眷安全,见识过精美的西洋建筑的华侨们,纷纷回乡兴建居守兼备的中西合璧建筑碉楼。现存的约1833座碉楼中绝大部分建造于20世纪初的20年间。碉楼见证一段华侨的奋斗历史,符合再现一段消逝的文明的世界遗产申报条件,经过开平市的努力,使它得以进入联合国教科文组织的视野,最终列入世界遗产的范畴。

 

居守兼备中西合璧

 

  碉楼多为高层塔楼,一般分为更楼式灯楼、众楼和居楼三类。碉楼墙身厚实,门窗窄小,顶层四面都有枪眼,并配有探照灯、警报器、枪械等。碉楼下部很平常,几乎都一个样,它所有的建筑表现力全部集中在顶部,样式多达100多种,具有代表性的有:中国传统的硬山顶式、中西合璧的园林式、别墅式、庭院式、古罗马式、中东式、美国式、英国式、德国堡垒式、土耳其回教式、教堂式等十多种。开平这些浓缩了中西方建筑艺术精华的建筑物,堪称是建筑艺术的「大观园」。

 

 碉楼吸收了古堡「军事防御」功能和其中的建筑艺术精华,并继承了中国建筑艺术传统。在极具异域风情的碉楼中,它们有中国式的楼名、仿明清式红木家具、喜庆的春晖、绚烂而精致的壁绘、鲤鱼状的排水口、门框和屋檐上的狮子、麒麟或飞鸟的浮雕……碉楼,让中西建筑艺术精华得到和谐的交汇、相融,独放异彩!

 

 有学者认为,开平碉楼是当地民众自动接受外来文化创造的,表明古代中国底层民众并不盲目排斥外来文化,至少东南沿海地区在外来文化冲击面前表现出不自卑、顽固、封闭、排斥,而是自信、开放、包容的心态,以我为主,为我所用。这或许是开平碉楼对海外建筑文化的深层阐释。

 

世界遗产四处景点

 

三门里迎龙楼

 古称迓龙楼,至今已有400多年历史,是开平现存最古老的碉楼。楼高三层,壁厚近一米,占地152平方米

自力村碉楼群

 是开平碉楼与村落的典型代表,现存碉楼15座,其中有最精美、华侨用品保留最齐全、被誉为「华侨家庭博物馆」的铭石楼。

马降龙碉楼群

 共有碉楼和别墅13座,这些碉楼造型别致,保存完好,掩映于村后茂密的竹林丛中,被联合国世界遗产评审专家称为「中国最美的村落」。

锦江里瑞石楼

 有「开平第一楼」之美称的瑞石楼,是中西建筑风格完美结合的典型,也是开平现存最高、最美的碉楼,楼高925

 

华侨园林一绝——立园

 

■华侨园林一绝:立园

 

 立园于2002年评为国家AAAA级旅游景区,是旅美华侨谢维立先生历时十载建造的别墅园林花园,于1936年建成。该园既有中国传统园林、岭南水乡风格,又融合了欧美别墅建筑的西洋情调。园内分大花园、小花园和别墅区三部分,各以人工河或围墙分隔,又以桥亭和曲径回廊相通,亭台楼榭精美别致、园中有园、景中有景,堪称中国华侨园林一绝。别墅区内有泮文、泮立等六幢建筑装饰中西合璧的别墅和碉楼一座,室内装饰和摆设豪华、藏品丰富;大花园以「立园」大牌坊和「本立道生」牌楼为轴心,两边雄峙着两根钢铁制的打虎鞭,蔚为壮观;沿牌坊拾级而上有放生池、百鸟园和花藤亭点缀其间;园主与爱妻谭玉英之间的爱情生活故事更使园中增添几分浪漫感叹色彩。联合国教科文总干事亨博士参观立园后称赞它是开平传统文化的光辉典范,是中国文化同西方文化完美结合。

 

演绎古今故事——赤坎古镇、影视城

 

■晨光中的赤坎古街

 

 赤坎古镇是「全国历史文化名镇」,绵延2公里的骑楼古街临江而建,欧陆风情街是古街上最具特色的一段。纯朴的民风,独特的西洋建筑与石拱桥、骑楼、江上休闲的小舟呈现出岭南集市「小广州」的特色。具有欧美格调的司徒氏通俗图书馆和关族图书馆各居一隅,这些红墙绿瓦、庭院钟楼、秀花名竹式的公用文化设施,成为赤坎侨乡文化的一景,起着倡导文化、发展科技的巨大作用,真实见证大时代的历史变迁。赤坎古镇曾是香港电影《醉拳II》、央视《香港的故事》的主要拍摄基地,也是凤凰卫视《寻找远去的家园》拍摄的第一站。赤坎影视城占地总面积6000平方米,整体景观根据上个世纪20年代的广州西关侨务建筑风格而设计建造。影视城不仅将中国传统的建筑雕花艺术表现得淋漓尽致,而且还将西方著名的浮雕艺术兼而收之,外观与欧陆风情街巧妙融为了一体。其实赤坎就是一个偌大的影视城,在流金岁月中不断地演绎着迷人的故事。

 

广东最佳旅游和投资目的地 开平

 

■三江绕城而过,六岸迷人美景。

 

本报记者 刘慧华 资料提供:开平市旅游局

 「开平碉楼与村落」申遗成功,使开平的旅游业进入飞速发展时期。去年101日,是「开平碉楼与村落」申遗成功后第一个黄金周的首日。据统计,这一天开平共接待国内外游客5万多人次,同比增长1倍左右,各星级酒店也全部爆满。借助世界遗产这双「翅膀」,开平将实现旅游产业的大腾飞。亟待配套的大型地产、高级酒店、主题公园、休闲度假等第三产业商机无限!

 

优越的区位交通

 

 开平地理环境优越,濒临南海,毗邻港澳,地处江门五邑的中心位置,开平拥有完善的水陆交通网络。广州国际机场是中国最现代化的大型国际机场,每天有航班往返美国、欧洲、日本等世界各地。开平到广州国际机场有佛开、广佛高速公路连接,只需60分钟车程。佛开、开阳高速公路、325国道贯通开平全境,成为沟通港澳、广州、深圳与粤西地区的交通中枢,全市形成「四纵两横」公路网,四通八达,实现「半小时生活圈」。国家一级口岸的开平三埠港建有集装箱码头和保税仓库,每天有客(货)轮往返香港、澳门,商贸往来十分便利。

 

充足的水电资源

 

 开平市主要依靠广东省大电网,自己同时也建有发电厂,电力充裕。开平市河网密集,建有大型水库,拥有丰富的水资源,工业用水和生活用水敞开供应。开平市用电、用水均能充足保障全市生活和生产的需求。

 

配套的产业体系

 

 经过二十多年的改革开放,开平已建立了雄厚的产业基础,形成了水暖卫浴、纺织化纤、食品、电子、医药、建筑等优势产业,产业配套迅速形成、发展。拥有行业种类齐全、上下游产品分工配套完善的现代化工业体系,形成了「中国水龙头生产基地」、「中国纺织产业基地」、「全国食品工业强市」三大支柱产业架构,聚集效应明显,配套能力强,产业链不断延伸。

 

优良的政务和治安环境

 

 开平市各级政府实行政务公开,启动上网工程和数字政府工程,政府和各部门的重大决策、政策法规、办事程序等事项向企业和市民公开;依法行政,对社会、经济管理规范。开平多年来营造「安全、赚钱、开心」的投资环境,社会治安稳定,人民安居乐业,外商到开平投资有一种舒适、安全感。

 

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

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

相 关 连 接
·还没有相关文章
网 友 评 论
·还没有相关的评论!
发 表 评 论
您的大名: (点击这里注册)
友情提醒:评论请限制在100字以内,有长篇大论欢迎到论坛发表:)
 

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

>> 本类热点新闻

·广东龙门第二届南昆山生态旅
·观澜湖别墅创6000万高价
·迪斯尼游客可赴海泉湾
·珠江直似塞纳-马恩省河 广
·50万人潮涌大小梅沙
·最大香草世界亮相广州
·穗民:港不再是购物天堂
·邮轮热访神州 各国豪客纷至
·广州旅社本周售青藏铁路票
·迪园专列直通车今开通
·穗市民有望五一游蒙古国
·穗客乘汽车追「青藏首列」
·番禺宝墨园 龙飞凤舞迎新春
·京现沙尘暴 粤游客却步
·粤北寒梅笑初冬
·广东11月办国际旅游节
·穗推「门票通」景区自由行
·羊城客游港澳报名增五成
·连场台风 穗旅游旺季不旺
·粤五一省内游价涨25%
·广东国庆旅游团增3成
·先揽客再狠宰 低价团又猖獗
·五一假缩短 粤省内游增3成
·粤人十一游港人数料增一成
·广东旅游文化节11月开幕
·粤拟首发团后推特色台湾游
·30广东客灾后首游川
·粤漂流游锐减 温泉受捧
·近在身边的世界遗产——开平
·5万广东客 假期涌迪园

 

合作媒体

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


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