<%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-1-17


■广东省政协港区委员16日到南沙港码头参观,笑称希望南沙港能在货运上为港企提供优惠。本报记者

 

 广东省第十一届人大第一次会议今(17)日将在广州召开,省长黄华华将在会上作政府工作报告。与往年相比,此次报告首次大篇幅提到「促进加工贸易转型升级」、「扩大内需」、认真实施《劳动合同法》等。有分析人士称,这意味着向来以外源型经济为主导的广东产业格局,将发生重大调整。

 

 本报获悉,黄华华今日所做的政府工作报告,在部署今年十大工作重点中,产业结构调整成为核心内容。此外,粤港合作的重点领域,也从去年政府工作报道重点关注的口岸、基建等方面的合作,转为「深入实施CEPA,加强粤港现代服务业务合作,提升制造业合作水平」。

 

鼓励企业创建自主品牌

 

 在黄华华的报告中,提出「促进加工贸易转型升级。鼓励现有加工贸易企业增资扩产、扩大国内采购和深加工结转业务,创建自主品牌和设立研发机构。完善加工贸易准入管理,吸引跨国公司把技术含量和增值率高的加工制造缓解转移到广东,引导加工贸易企业逐步向园区和海关监管和特殊区域集聚。」

 

 黄华华也提到,要「积极稳妥推动加工贸易企业扩大内销」,与此对应,他具体要求广东「扩大内需」。同时,黄华华也特别提到要「积极开拓俄罗斯、东盟、中东、非洲和南美洲等市场」,积极应对国际贸易摩擦和壁垒。

 

港商冀新政策真正落实

 

 香港鞋业商会会长高柱表示,很高兴看到广东省将出台新的措施和政策,帮助众多企业做大做强,但是他也指出广东省已连续几年都在产业转移方面不断收紧政策,迫使加工贸易类的企业,因为生存环境艰难而不得不向成本相对较低的地区转移。但尽管如此,大多数中小型港资企业,还是不愿意转移到广东省划定的工业园区,原因就在于那些地区各种产业配套以及基础设施都不够完善,亟待改善。

 

 高柱也指出,他和所有的协会会员,都很高兴听到广东省政府愿意出台政策,帮助企业提高附加值,做自己的品牌。但做品牌需要强大的资金和专业人才的支撑,因此政府如果能在资金和专业人才培训方面,为企业多做一些扶持工作,那么相信广东省就会有更多的名牌企业诞生。

 

 对于广东省今年将严格执行新的劳动合同法,高柱就认为新法实施的太着急,没有给企业和工人留出相应的理解和适应时间,所以近期在广东省的广州、东莞、佛山、中山等地都不同程度的出现了工人罢工事件。这对于企业、政府、工人三方面来说,都造成损失。因此他建议,政府最后能够做一些咨询之后,留出时间来让劳资双方都适应。 ■本报广东省两会报道组

 

调研目的一 落实科学发展观 粤先探路

 

 汪洋在两会上谈及解放思想的迫切性时,曾引述省社科院去年1229日发布的《2007年度广东区域综合竞争力报告》。如果细阅这份报告所提及的广东省所面临的困境与挑战,就可以明白汪洋为何用「要像改革开放初期那样,杀开一条血路」这样份量极重的语句,来形容广东的现况。

 

隐忧众多 人均GDP逊江浙

 

 《报告》指出,从2006年度的统计资料看,在经济总量上,广东与山东、江苏相比,仍然存在4,000多亿元的优势。但广东GDP的领先与众多的人口不无关系,如果以人均GDP为标准(按常住人口计算),广东不仅落后于上海、北京、天津等直辖市,而且也落后于浙江、江苏。过去10年,广东省人均GDP年均增速,在沿海省市中排名最后,不仅被江苏超过,而且与浙江的差距也在不断拉大。

 

 另外,广东虽拥有全国最富庶的珠江三角洲,但全省却仍有近2,000万人没有脱贫,近2,000万失地农民生活缺乏保障,近2,000万外来农民工收入依然低廉。城乡之间、地区之间的发展很不平衡,农村经济与社会发展仍然滞后,周边地区发展基础仍然薄弱,县域经济发展水平仍然不高,群众生产生活还有许多困难没解决。

 

重振经济 更重社会均衡发展

 

 专家指出,在汪洋看来,广东未来发展的重点,除了经济方面要有新突破之外,更要将重点放在社会公平、社会治理、制度建设和公民的道德重建上。这其实是处于发展新阶段的整个中国,在今天都要面对的难题,也是胡锦涛总书记提出「科学发展观」所要解决的问题。改革开放先行一步的广东,比国内其它地区更早地遇到了这些难题,而找出解决这些难题的方法,正是中央以至整个国家,对广东的新期许。

 

调研目的二 提升国际竞争力 形势严峻

 

 如何加快广东经济发展与国际接轨,提升全面的国际竞争力?广东产业如何主动对接国际产业分工?这是广东省委此次调研的另一重要命题。汪洋说,广东要以「新一轮思想解放推动新一轮发展」。

 

吸引外资 江苏早夺广东交椅

 

 事实上,与2000年相比,广东FDI(外国直接投资)增长了20%,天津增长了60%,江苏增长了170%,山东增长了230%。尽管2005年以来广东出现了较大反弹,但原来在全国一枝独秀的优势已不复存在,实际利用外资的第一把交椅已经拱手让给了江苏──2006年,广东与江苏实际利用外资相差近30亿元。

 

 广东的FDI主要来自香港,2006年从香港进入广东的FDI虽然还超过江苏,但广东吸收香港的资金比2000年少了6亿多元,江苏则猛增了近30亿元。此外,从欧美日等发达国家流入的FDI,江苏从2000年以来共增加了18亿美元(约合140.4亿港币),但广东只增加了2亿(约合15.6亿港币)。如果再加上韩国与新加坡不断增长的投资,广东落后于江苏、珠三角落后于长三角已是不争的事实,因为除江苏外,上海、浙江与山东的FDI同样呈快速增长的趋势。

 

自主创新 不及全国平均水平

 

 另外,广东在自主创新方面存在诸多不足,据了解,广东IT领域的专利85%来自国外,高新技术企业对外技术依存度在70%以上;研发投入占GDP比重仅为1.2%,低于全国1.4%的平均水平,更低于北京、上海、陕西、天津、江苏、浙江等省市。

 

 如何解决这些问题,是广东省调研的主要目的之一。

 

粤高层近期调研活动(部分)

 

20081

8日至9日 省长黄华华率队到韶关市考察调研。

      副省长雷于蓝到汕尾市就卫生、人口计划生育和文化调研。

 9日   常务副省长汤炳权赴中山调研外经贸和旅游。

      副省长李容根赴韶关调研农业生产。

 5日至8日 省委书记汪洋赴潮州、揭阳、汕头调研。

 4日    常务副省长汤炳权赴东莞调研加工贸易企业升级转移。

200712

29日 副省长宋海赴深圳大学调研高校毕业生就业工作。

28日 副省长雷于蓝到江门恩平市调研。

27日 常务副省长锺阳胜一行在汕头市、潮州市实地考察多家企业的经营发展情况。

22日至23日 省委书记汪洋到湛江调研。

19日至20日 副省长林木声赴河源市调研城乡规划建设和城市低收入家庭住房困难问题。

      副省长雷于蓝到汕头、潮州市调研卫生、人口计划生育和文化。

 11日至13日 省委书记汪洋赴清远调研。

 

广东VS新加坡人均GDP差距大

 

 广东主要经济数据 新加坡主要经济数据

 面积   17.98万平方公里  0.69万平方公里

 人口   9304万       449

2007

 GDP年增长率 14.5%     7.4%

 GDP     3721亿美元 1410亿美元

 人均GDP   超0.4万美元 3.2万美元

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

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

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

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

>> 本类热点新闻

·朱小丹任穗书记 林雄掌粤宣
·新劳动法咨询 港商提10质
·黄云龙任广东省副省长
·粤调整五地级市首脑
·张德江近日赴京汪洋下周抵粤
·400亿超级石化 落户广东
·许宗衡:深港共建创新圈
·港珠澳大桥敲定明年动工
·南沙赢中科石化400亿项目
·粤筹建三条大西南铁路
·温总巡粤 为五中全会做调研
·「十一五」末 粤总产值势超
·珠澳深层合作 横琴或成试点
·广东前省长梁灵光辞世
·张德江:永远忘不了广东
·阳江军演 176个航班取消
·粤4000万元出口商品遭退
·粤港边界 铁网将拆
·佟星林木声任粤副省长
·穗深莞构筑扫黑铁三角
·港人内地养老 应享同等福利
·港商向张德江黄华华进言
·港政协委员吁粤设辅警
·三年投资一百亿 条条大路催
·十一.五商机之广东篇.广东
·港珠澳大桥 香港口岸方案三
·珠三角新政与港企出路四之三
·粤收紧赴港澳签注审批
·粤政府出招吸港企北迁
·温总:深港合作将增自由度

 

合作媒体

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


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