" search=search&"" 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%>

报料、招商、投诉热线:020-83825987 在线订报  在线投稿 网站首页 | 活动视窗 | 时政要闻 | 金融财经 | 产经新闻 | 社会新闻 | 科技动态 | 教育文化 | 旅游休闲 | 饮食娱乐 | 粤港合作 泛珠新闻 | 广州 深圳 珠海 佛山 汕头 中山 东莞 江门 韶关 河源 梅州 惠州 汕尾 阳江 湛江 茂名 肇庆 清远 潮州 揭阳 云浮

您的位置：首页 > 综合新闻 > 粤港合作 　 大桥报告评审 力争八月获批 　 wwpprd.com 作者:wwpprd.com 来自:文汇报 点击:0 时间:2008-6-18 ■港珠澳大桥整体投资逾600亿元、大桥主体投资约380亿元。图为大桥效果图。   　备受粤、港、澳三地关注的港珠澳大桥今年料有重大突破。据了解，包括投融资方案、环评在内的25个工程可行性项目已全部完成，并汇编成港珠澳大桥工程可行性总报告。今明两日（18-19日），广东省交通厅、发改委、港澳办等部门以及全国各地桥梁建筑方面专家近百人，组成的专家评审组，将在珠海对该报告进行初审，通过后即上报国务院。消息人士称，该份报告将力争在今年8月获批。另有消息透露，上周三，中共中央政治局委员、广东省委书记汪洋曾在广州会见香港特首曾荫权，特别就港珠澳大桥融资问题及加快大桥项目进程等事宜进行商讨。■本报珠三角新闻中心记者：刘扬     据了解，上周汪洋与曾荫权在广州珠岛宾馆的会面中，已就双方关注的粤港合作重点事宜交换了意见。消息人士称，在该次未对外公开的会见中，港珠澳大桥是双方讨论的主要议题，包括寻找投资者的方式，以及加快推进大桥项目进展等问题。据悉，双方将在完成工程可行性报告后，在「一国两制」的制度框架下，各走程序，并一同寻找合适投资者，力争使项目尽快上马。   报告汇集25专题成果   　据消息人士透露，2004年，港珠澳大桥的前期协调小组委托中交公路规划设计院（公规院）开展项目工程可行性研究，目前，25个大桥专题已全部完成。由于各个专题的专业性太强，为方便审批，所有专题成果已汇集进入总报告。据了解，总报告的内容主要包括两部分，第一部分是技术上的问题，包括大桥的工程规模、桥位、大致工程方案以及造价等；第二部分是投资主体问题，包括对工程可行性报告的经济分析和经济评价，以及建议的寻找投资者形式等。   　目前，由于港珠澳大桥还未进行招标，亦未寻找到合适的投资者。因此，在上周汪洋与曾荫权的会面中，寻找投资者的问题显得尤为重要。据了解，报告获批后，工程将正式进入寻找投资者的阶段。但目前相关人士尚未透露粤港双方是否就寻找投资者的方案取得共识。   审批时间缩短5/6   　消息人士称，专家评审是目前总报告完善的重要环节，将充分吸纳各方专业人士的意见。港澳方面亦有派员参加今天的初审。在听取专家评审后，总报告将在完善内容后上报国务院。   　记者亦了解到，为加速大桥进度，国家发改委也已「特事特办」，为大桥简化了审批程序。但部分项目仍需要国家环保、水利、海洋、交通、口岸等部门批准。同时，由于粤港澳三地法律程序不同，三地工程可行性报告的审批耗时可能也不一样。   　今年3月，广东省全国人大代表、省发改委主任李妙娟曾在北京预测，大桥的工程可行性报告要到2009年才能在国务院获批。消息人士称，按照目前的进度，获批时间将大幅提前，理想进度是在今年8月即在两个月内可获批。据介绍，类似港珠澳大桥的大型跨境工程项目，如按照国内正常审批程序和时间，将耗时近一年。如此算来，港珠澳大桥的审批时间缩短了近5/6。   　港珠澳大桥整体投资逾600亿元、大桥主体投资约380亿元。由于对珠江西岸经济带动性强，为有效推进该项目，港珠澳大桥已「超常规」地被列入广东今年的重点预备项目。李妙娟此前也透露，由于粤、港、澳三方都希望大桥在2014年完工，因此，部分涉及大桥下一阶段的任务，目前也已「开工」。   投资大桥：批准收费50年 36年可回本     据了解，尽管港珠澳大桥前期协调第8次会议已就投融资方案达成共识，但因为招标尚未正式开始，寻找合适的投资主体仍是三方关注的问题。据消息人士透露，大桥整体项目投资逾600亿元，其中主体部分约380亿元，由三方共同寻找投资者和建设。   整体投资600亿   　此前，广东省省长黄华华曾透露，粤港澳三地最近已对港珠澳大桥融资方案达成一致协议，大桥主体三地共同建设，并进行招标。大桥主体投资部分，虽然上报批准收费时间为50年，但预计投资方36.5年即可收回成本。此外，粤港澳三地政府将负责各自口岸和连接线部分的建设。   　消息人士称，2月底，粤港澳三地政府已专就融资方案进行商讨，并 已达成共识。大桥主体工程将采取公开邀请招标的方式选择投资人，三地政府按效益费用比相同的原则，计算分摊补贴的比例，初步确定由香港负责50.2%，广东负责35.1%，澳门负责14.7%。   　除政府补贴外，资本金不足部分由中标的投资人融资筹集。三地合作建设的大桥主体桥隧工程长约29.6公里。   大桥添经深圳 可能性极小   今年初，深圳和珠海政协委员都曾提方案，呼吁中央修改港珠澳大桥单「Y」方案，重新选用「添足」深圳的双「Y」方案。对此，有媒体称，广东省交通部门人士透露，由于中央及粤、港、澳三方早在2004年底就敲定单「Y」方案，并以此展开工程可行性研究，如今已进入招投标前期阶段，因此改用原来方案的可能性很小。   专家曾倡「双Y」方案   　据最先提出双「Y」方案的广州中山大学教授郑天祥介绍，如今仅大桥主体投资已逾400亿元，三地政府要提供巨额补贴，说明在大桥建成后的经济效益方面或存在问题，三地政府对此也显得信心不足。他认为当初大桥选择单「Y」方案排斥深圳的结果，就是使大桥建成后的车流量缩减三分之一，如今大桥建设的社会意义和政治意义已远大过其经济意义。   　据媒体报道，广东省交通部门人士指出，若各方的角力继续僵持的话，只会导致大桥悬而不决，动工一拖再拖，如此会十分不利于整个区域的整合。因此，大桥重新改用双「Y」方案的可能性很小。   　该人士透露，随着港珠澳大桥进入实质性的招投标程序，即将上马之际，广东省政府也从实际出发，已正式对深圳至中山过江隧道工程展开可行性研究，有望年内完成工程可行性报告编制，并最快在港珠澳大桥拍板动工时通过立项。 责任编辑：cnred 文章页数第[1]页  页面功能 【我来说两句】【字体：大 中 小】【打印】 【关闭】 相 关 连 接 ·还没有相关文章 网 友 评 论 ·还没有相关的评论！ 发 表 评 论 您的大名: （点击这里注册） 这里填写您的评论：） 友情提醒：评论请限制在100字以内，有长篇大论欢迎到论坛发表：） 　 综合新闻|广东新闻|专题新闻 >> 本类热点新闻 ·深圳置业 港人三变化 ·港珠澳大桥 上马有期 ·深港5年内 将增5口岸 ·港珠澳大桥战略大解构 ·港珠澳大桥好事多磨终会建 ·深穗外拓货运港机场陷危机 ·普华永道增聘千人港专业界北 ·粤港合建世界级城镇群 ·深医护人员成染爱滋高危族群 ·张德江冀粤港澳合作「裂变」 ·深港合作获两大突破 ·广深港高铁将接轨京杭 ·省市一把手亮相星光熠熠 ·承接服务外 包港企占先机 ·穗机场：无惧港深合作 ·梅州强行炸矿两港商质疑 ·粤港启动反倾销合作机制 ·中山港人：两地应常沟通 ·许宗衡提深港同城化 ·中央拟新政策再促深港合作 ·穗港青少年服务中心揭幕 ·深港连手发展河套 ·粤30养老机构来港拓服务 ·食品安全通报 粤港设联络员 ·粤港联席会确定20重点合作 ·粤港首次联办经贸交流会 ·梅州已炸逾200矿井 ·曾荫权强调港粤合作三不变 ·东莞制造香港设计将创新模式 ·粤千五人商团 今在港招商

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