<%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 来自:文汇报 点击:174 时间:2007-2-6


■汕尾着力打造电子信息产业、电力能源及石化工业三大基地。

 

■本报珠三角新闻中心记者 唐苗苗、余文莲、余丽龄

 

 去年9月,广东省对粤东作出了「三年打基础,五年大变化,十年大发展」的总体部署,汕尾作为粤东地区最靠近珠三角的城市之一,具有独特的区位优势,崛起的机遇不言而喻。汕尾已初步确定2007年全市重点建设项目达27项,总投资183.1亿元,年度计划投资50.4亿元。记者了解到,重大项目已成为汕尾崛起的重要引擎,其中港资的注入功不可没。

 

 在汕尾市政府提供的一份材料中,记者看到,汕尾近期已建成的产业项目共68个,总投资90亿元,其中超亿元项目5个,包括汕尾电厂一期投资62亿元、500千伏茅湖输变电工程投资5.6亿元等;近期在建(动工)产业项目79个,总投资98亿元,其中超亿元项目14个,包括中港纸品总投资1,250万美元等;已签约推进项目95个,总投资206亿元,其中超亿元项目24个,包括香港华策集团房地产投资55,859万美元、碧桂园房地产开发项目投资10亿元等等。

 

振兴电力、电子、石化

 

 据汕尾市市委副书记郑雁雄透露,现时已预计投入汕尾的资金达近3,000亿人民币,按14的平均拉动系数保守计算,未来10年将有1万亿投资在汕尾这片土地上!

 

 随着一个个大项目落户汕尾,汕尾市市委书记戎铁文很清楚这些大项目所带来的发展机遇:「重点项目建设是跨越发展的『主引擎』」。在项目的选择上,汕尾指向明确,发展能源工业和临港工业已成趋势。除了在建的汕尾发电厂外,陆丰核电站、陆丰甲湖、甲东风电场、国投大华发电厂、500千伏汕尾输电工程配套项目、500千伏汕尾发电厂送出工程以及滨海、河口110千伏输变电工程等项目都在加紧建设中。汕尾正在崛起为粤东的电力能源产业基地。

 

 而凭借早在1986年就进入汕尾的港资信利集团,以及发展势头良好的德昌电子信息企业,汕尾更确立了发展高新技术领域电子信息产业的目标,将建设以TFT、二极管和三极管等产品为重点的电子信息产业基地。

 

 戎铁文提出,汕尾还将打造石油化工产业基地。在建的海丰小漠华城能源有限公司项目,投资2.32亿元,将成为海丰石化项目建设的启动项目。再加上陆丰石化工业园区项目的前期建设,配合好粤东成品油管道(汕尾段)建设,积极引进石油化工中下游产品,汕尾有希望把石油化工培植成为新兴支柱产业。

 

招商引资 港资占鳌头

 

 毗邻港澳、侨胞众多是汕尾发展经济的一个重要优势,在过去的一年里,汕尾市积极参加粤港经贸合作交流会等境内外招商洽谈会,单是2005年在香港的一次招商就引进了28.62亿美元的投资。

 

 根据汕尾市的统计,2006年汕尾吸收外商直接投资1.45亿美元,比上年增长19.9%,其中港资占了大头:港资的海陆科技(汕尾)有限公司投资2亿元建设工业园区、旅游商贸建设项目;港企汕尾信利集团投资7.8亿元建设OLED项目;香港华策集团投资55,859万美元建设房地产项目等。

 

 戎铁文表示,将继续落实领导官员项目包干责任制,采取配套措施,确保这些大项目按期竣工投产,并成立专门机构,专责跟进已签约项目特别是重大项目的后续履约。

 

发展园区 承接产业转移

 

■总投资284亿元的火力发电厂在建设中。

 

 紧抓广东省推动山区及东西两翼承接珠三角产业转移的历史机遇,汕尾也开始探索建设产业转移园区。

 

 据汕尾市市长王蒙徽透露,汕尾正和东莞的大郎,以及深圳的水田,探索共建产业转移园区。在「劳工荒」已深深困扰珠三角众多企业工厂,土地、电力等资源亦日渐紧张的同时,拥有丰富廉价的土地、电力及劳动力,使汕尾承接珠三角产业转移具备了可能性。通过整合与珠三角地区的产业互补,发挥区位人缘优势,承接安置转移企业亦将有助于尽快形成产业连锁效应。

 

 另一方面,汕尾亦加快了现有工业园区的建设。目前已建有市区电子信息产业园区、海丰金园工业区、海丰科技工业园、海丰公平服装工业园、陆丰东海工业开发区、陆河工业园6个工业园区;并正筹建红海湾经济开发试验区、陆丰东海经济开发试验区、陆丰星都经济开发区、海丰老区经济开发试验区、市区番禺产业转移园区、海丰东莞(大朗)产业转移园区、陆丰深圳(水田)产业转移园区7大园区。

 王蒙徽表示,汕尾将通过制定一系列鼓励工业发展的优惠政策,加大投入完善各项基础设施,包括对现有工业园区进行科学规划和优化整合,高效、合理利用土地资源;完善基础设施配套,使园区成为集聚产业功能、资金技术、巨大产能和增长潜能的重要经济载体。

 

高新产品出口 居粤东之冠

 

■制衣是汕尾的传统工业。汕尾今后将培育建立服装、圣诞礼品等一批出口基地。

 

 据汕尾市外经贸局的数据显示,2006年汕尾市外贸进出口总值15.5亿美元,进出口贸易地域遍及港澳台、美国、欧盟、东盟、日本、俄罗斯等国家和地区,其中香港和美国是最主要的进出口贸易市场。

 

 汕尾市外经贸局局长陈坎介绍:汕尾2006年的进出口贸易中,初级产品仅占出口总值的1.86%,工业制成品占出口总值98.14%,其中机电产品和高新技术产品出口比重提高,占出口总值72.8%。可喜的是,汕尾的外贸出口增速排在广东省第2位,高新技术产品出口量已跃居粤东第1,广东省第5

 

 2007年,汕尾提出了外贸出口增长30%,突破10亿美元大关,吸收实际利用外资增长30%的预期目标。为实现这个目标,汕尾除了大力扶持民营企业出口创汇,积极开拓国际市场,还将培育建立服装、制鞋、金银珠宝首饰工艺品、圣诞礼品、水果加工、水产品加工等一批出口基地;在巩固港澳台、美国、加拿大、日本、欧盟等传统出口市场的基础上,积极拓展俄罗斯、南美、非洲、中东和东盟等有增长潜力的出口市场,实现出口市场多元化。

 

07年经济社会发展目标

 

■汕尾市市委副书记郑雁雄透露,未来10年可能有1万亿的投资。

 

 ■地区生产总值增长18%

 ■农业总产值增长6%;工业总产值增长29%,规模以上工业产值增长35%;第三产业增加值增长16%

 ■社会消费品零售总额增长18%

 ■全社会固定资产投资增长30%

 ■居民消费价格涨幅控制在3%左右;

 ■地方财政一般预算收入增长25%

 ■外商直接投资增长30%

 ■外贸出口总额增长30%

 ■城镇登记失业率控制在3.5%以内;

 ■农民人均纯收入增长6%,城镇居民可支配收入增长9%

 ■人口自然增长率控制在6.76%以内;

 ■每万元GDP能耗控制在0.534吨标煤以内。

 

产业项目一览

 

■汕尾加紧发展电力能源。图为市电厂及风力电厂一角。

 

建成项目超亿元5个:

 

1. 汕尾电厂一期

2. 500千伏茅湖输变电工程

3. 信利集团OLED项目

4. 海丰金丽湾度假村

5. 陆丰甲东风电场第一期工程

在建项目超亿元14个:

1. 中港纸品

2. 海之宝水产品开发有限公司

3. 万福黄金海岸房地产

4. 汕尾遮浪公路改建工程

5. 金湖路(海滨大道三期)

6. 陆丰核电大道

7. 海陆科技(汕尾)有限公司

8. 海丰湾东方雅典旅游项目首期

9. 华师附中汕尾分校

10. 海丰华城能源有限公司

11. 海丰富革来皮革基地

12. 海丰慧明眼镜城

13. 海丰后门金海花园

14. 海丰联河新区富丽花园

 

已签约推进项目超亿元24个:

 

1. 信利半导体有限公司三期

2. 汕尾黄金海岸大酒店

3. 香港华策集团房地产

4. 碧桂园房地产

5. 城区万盛五星级酒店

6. 城区宝明科技实业公司

7. 城区丕微科技企业

8. 城区卓运电子有限公司

9. 海丰雅天妮工业园

10. 海丰中泉铜制品厂

11. 海丰梅陇金银首饰城

12. 海丰大百汇科技园

13. 海丰咸水温泉度假村

14. 陆丰甲东风电二期

15. 陆丰电子、五金加工

16. 陆丰上英纺织

17. 陆丰污水处理厂

18. 陆丰五金电镀化工工业园

19. 陆丰碣石湾旅游地产

20. 广东宝丽华(陆丰)甲湖风电

21. 陆河上护温泉度假村

22. 陆河汤排温泉山庄

23. 陆河水田工业园区

24. 红海湾大中华旅游酒店

 

汕尾产业园区一览

 

已建工业园区:

1. 市区电子信息产业园区

2. 海丰金园工业区

3. 海丰科技工业园

4. 海丰公平服装工业园

5. 陆丰东海工业开发区

6. 陆河工业园

在建、筹建工业园区:

1. 红海湾经济开发试验区

2. 陆丰东海经济开发试验区

3. 海丰老区经济开发试验区

4. 陆丰星都经济开发区

5. 市区─番禺产业转移园区

6. 海丰─东莞(大朗)产业转移园区

7. 陆丰─深圳(水田)产业转移园区

 

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

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

相 关 连 接
网 友 评 论

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

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

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

>> 本类热点新闻

·汕尾红海湾警民传酿冲突
·汕尾公安副局长革职刑拘
·汕尾打造「现代化滨海城市」
·“魅力汕尾”后发优势凸现
·海陆科技拟150亿投汕尾
·十一.五商机之汕尾篇.汕尾
·外资看好汕尾发展
·粤“新汕尾”发力腾飞
·古风泛珠江 魅力聚汕尾
·“达维”登陆汕尾 为首届
·核能地产高科技 汕尾蕴万亿
·汕尾成粤东高新出口基地
·汕尾借促粤东发展机遇 办纪
·五年大计汕尾打造滨海新城
·珠三角东花园 汕尾振翅欲飞

 

合作媒体

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


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