当前日期:
" else response.write "" do response.write "" rs.movenext if not rs.eof then response.write "" loop until rs.eof response.write "" end if response.write "" rs.close set rs=nothing end function function SearchForm() response.write "

<%=HeadNavigation()%>

诚征行业中心/指导中心专题首页   全国高健委健康专业委员会简介   组织机构   管理规程   核心成员(九部委)   国家部委机关CHC再确认



全国高健委孟昭锐主任与全国人大副委
员长王汉斌(中)、彭偑云(左)合影


左起:王海澎、刘如、孟昭锐、谢建军


左起:谷惠敏、王悟铭、刘如、
孟昭锐、刘存祥


刘如与卫生部副部长殷大奎(左)

国家九部委联合机构 每省/直辖市/计划单列市仅设1
全国高健委健康促进专业委员会诚征各地指导中心


刘如与原国家医药管理局局长齐谋甲(左)


刘如与民政部副部长徐瑞新(左)


健康促进专业委员会主任刘如


健康促进专业委员会常务付主任王海澎

    为贯彻落实党中央、国务院“科技兴国”的战略方针和邓小平同志“发展高科技,实现产业化”的指示,1996年由国家科委、国家教委、建设部、信息产业部、中国科学院等国家九部委组建了全国高技术产业化协作组织,后扩大为公安部、卫生部、农业部等十五个核心成员。全国高科技健康产业工作委员会(简称全国高健委、英文缩写CHHIC)是负责在全国范围内协调、促进健康产业实现高技术产业化的工作委员会,是目前全国健康领域中唯一的以“政府行为推动,市场行为实施”的管理机构。
    健康促进专业委员会是在全国高健委领导下,负责协调指导健康产业向高科技产业化发展的全国性组织,起到沟通政府与企业的桥梁作用,加快建设健康促进工程。运用现代理念和科学技术为人们健康长寿作出积极贡献。
    本着促进发展、友好合作的原则,团结全国从事医药卫生、康复保健、饮食营养、养生休闲、体育健身等健康产业的团体及个人,共同促进健康产业向高技术产业化发展。为此,健康促进专业委员会经研究决定,拟在全国范围内,每省、直辖市、计划单列市设立1家指导中心如“全国高健委健康促进专业委员会四川指导中心”。诚望有实力、守信用的单位或个人一起携手共创前程!
    工作范围请参考《管理规程》。
   指导中心申请步骤:
    一、申请报告
    中心或基地等分支机构名称、宗旨、工作计划、分支机构组成人员。
    二、主申办人的简历
    申请分支机构必不可少的履历表。
    三、主申办人的资质证明:
      1.学历证书、学位证书、奖励证书等复印件;
      2.单位(公司)营业执照复印件;
      3.身份证复印件。
    本专业委员会收到申请人的申请材料后,将对申办单位进行考察,择优设立。由于每省/直辖市/计划单列市仅设1家,故本次申请不成功者将不退还申请材料,等以后有机会合作时,本专业委员会将会在适当的时间进行通知(电子邮件、电话或信函方式)。专业委员会对所有申请材料保密,绝不外泄(法律介入除外)。
    确定设立的申办方与专业委员会签订责任书并交纳一定申办管理费后,方可办理正式批文、任命、铜匾等手续。

全国高健委健康促进专业委员顾问委员会:
  
殷大奎:卫生部原副部长、中国医师协会会长
    李本公:全国老龄办原常务副主任、中华慈善总会副会长
    齐谋甲:原国家医药管理局局长
    白益华:民政部原社会福利司司长、中国
SOS国际儿童村协会会长
    路印林:全国工商联信息部原部长
    刘
  真:中共中央组织部党建研究所局级调研员
    乔秀清:中国人民解放军总医院政治部原副主任

   
全国高健委健康促进专业委员专家委员会:
  
库宝善:北京大学医学部药理学系主任、博士
    马秀英:军事医学科学院药理教研室主任、教授
    刘达临:亚洲大洋洲性学联合会副主席、上海大学社会学教授
    张国玺:中国中医科学院老年医学研究所研究员、教授
    翁维健:北京中医药大学中医营养教研室主任、主任医师、教授
    李乃夫:解放军某部医院原副院长、主任医师
    刘文静:中央人民广播电台一级播音员


数码美中国立体软件网-立体光栅网-立体广告网-立体印刷网(www.518cc.com) ©2000-2009 版权所有 All Rights Resverved.
北京数码美住所:北京八大处高科技园区西井路3号 电话:010-86868509 68881365 传真:010-68881365 68863313
中国健康促进网秘书处:北京市石景山区杨庄路110号华信大厦711# 询问QQ:501877168 学员QQ:99101529

中国健康促进网备案号:京ICP备09042758号

<% function HeadNavigation() dim rs,sql set rs = server.createobject("adodb.recordset") sql="select * from Ameav_Navigation where ViewFlag order by Sequence asc" rs.open sql,conn,1,1 if rs.bof and rs.eof then response.write "
暂无导航链接
" &_ "" &_ " " &_ " " &_ " " &_ " " &_ " " &_ " " &_ " " &_ " " &_ " " &_ "" &_ "
关键字:
范 围:" &_ " " &_ "
" end function function MemberLogin() if session("MemName")="" or session("GroupID")="" or session("MemLogin")<>"Succeed" then response.write "" &_ "" &_ " " &_ " " &_ " " &_ "" &_ "

" &_ " 会员:   " &_ "
密码:   " &_ "

 " &_ "  " &_ "
" else response.write "" &_ ""&session("MemName")&"
" &_ " ["&MemGroup(session("GroupID"))&"] " &_ "帐户管理 " &_ "" end if end function function MemGroup(GroupID) dim rs,sql set rs = server.createobject("adodb.recordset") sql="select * from Ameav_MemGroup where GroupID='"&GroupID&"'" rs.open sql,conn,1,1 MemGroup=rs("GroupName") rs.close set rs=nothing end function function TopFriendSite() dim rs,sql dim i,SiteFace response.write "" set rs = server.createobject("adodb.recordset") sql="select * from Ameav_FriendSite where ViewFlag order by id desc" rs.open sql,conn,1,1 i=1 do while not rs.eof if (i mod 12)=1 then response.write "" end if SiteFace=rs("SiteName") if len(SiteFace)>6 then SiteFace=left(SiteFace,6) response.write "" if (i mod 12)=0 then response.write "" end if i=i+1 rs.movenext loop response.write "
  " &_ ""&SiteFace&"
" rs.Close set rs=nothing end function function leftnews() dim rs,sql,i,NewsName,NewFlag set rs = server.createobject("adodb.recordset") sql="select ID,NewsName,SortID,AddTime,SortPath,ClickNumber from Ameav_News where ViewFlag order by ClickNumber desc" rs.open sql,conn,1,1 response.write"" response.write "" if rs.bof and rs.eof then response.write "" else for i=1 to 10 if rs.eof then exit for if StrLen(rs("NewsName"))<=26 then NewsName=rs("NewsName") else NewsName=StrLeft(rs("NewsName"),24) end if if now()-rs("AddTime")<=2 then NewFlag=" " else NewFlag="" end if response.write"" rs.movenext next end if response.write "" response.write"
暂无相关信息
 "&NewsName&""&NewFlag&"
" rs.close set rs=nothing end function function adv(adid) dim rs,sql,i,NewFlag set rs = server.createobject("adodb.recordset") sql="select * from Ameav_ADs where ViewFlag and id="&adid&" order by id desc" rs.open sql,conn,1,1 if rs.bof and rs.eof then Adv="../images/banner-1.jpg" else Adv=rs("BigPic") end if rs.close set rs=nothing end function %>