<%@ Language=VBScript%> <%'该文件需要进行调整和设置 dim typename NewsID=Request.QueryString("NewsID") Page=Request.QueryString("page") if page="" then page=1 elseif not IsNumeric(page) then response.write "" response.end end if page=int(page) if newsid="" then response.write "" response.end elseif not IsNumeric(newsid) then response.write "" response.end else conn.execute("update News Set Click=click+1 where NewsID=" & NewsID ) set rs=server.CreateObject("ADODB.RecordSet") if uselevel=1 then if Request.cookies("key")="" then rs.Source="select * from News where checkked=1 and newslevel=0 and newsid="&newsid end if if Request.cookies("key")="selfreg" then if Request.cookies("reglevel")=3 then rs.Source="select * from News where checkked=1 and newslevel<=3 and newsid="&newsid end if if Request.cookies("reglevel")=2 then rs.Source="select * from News where checkked=1 and newslevel<=2 and newsid="&newsid end if if Request.cookies("reglevel")=1 then rs.Source="select * from News where checkked=1 and newslevel<=1 and newsid="&newsid end if end if if Request.cookies("key")="super" or Request.cookies("key")="typemaster" or Request.cookies("key")="bigmaster" or Request.cookies("key")="smallmaster" or Request.cookies("key")="check" then rs.Source="select * from News where newsid="&newsid end if else rs.Source="select * from News where newsid="&newsid end if rs.Open rs.Source,conn,1,1 if rs.bof and rs.eof then response.write "无权限访问或无此内容,请注册登陆或联系管理员" else bigclassid=rs("bigclassid") smallclassid=rs("smallclassid") title=trim(rs("title")) title=replace(title,"
","") title1=trim(rs("title")) about=trim(rs("about")) Author=trim(rs("Author")) editor=trim(rs("editor")) Original=trim(rs("Original")) image=rs("image") UpdateTime=trim(rs("UpdateTime")) News_Content=rs("Content") SpecialID=rs("SpecialID") SpecialID2=rs("SpecialID2") click=rs("click") EnCode=trim(rs("EnCode")) typeid=rs("typeid") titletype=rs("titletype") titlesize=rs("titlesize") titlecolor=rs("titlecolor") titleface=rs("titleface") editor=rs("editor") if titlesize=0 then size="18px" else if titlesize=1 then size="8px" else if titlesize=2 then size="10px" else if titlesize=3 then size="12px" else if titlesize=4 then size="14px" else if titlesize=5 then size="18px" else if titlesize=6 then size="24px" else if titlesize=7 then size="36px" end if end if end if end if end if end if end if end if rs.Close set rs=nothing set rs=server.CreateObject("ADODB.RecordSet") rs.Source="select * from type where typeID=" & typeID rs.Open rs.Source,conn,1,1 typename=rs("typename") rs.Close set rs=nothing set rs=server.CreateObject("ADODB.RecordSet") rs.Source="select * from bigclass Where BigClassid=" & BigClassid rs.Open rs.Source,conn,1,1 bigclassname=rs("bigclassname") rs.close set rs=nothing if smallclassid<>"" then set rs=server.CreateObject("ADODB.RecordSet") rs.Source="select * from smallclass Where smallClassid=" & smallClassid rs.Open rs.Source,conn,1,1 smallclassname=rs("smallclassname") rs.close set rs=nothing end if %> 天门市第一人民医院
      栏目导航 网站首页>>医院领导
  
 
<% set rs=server.CreateObject("ADODB.RecordSet") rs.Source="select * from News where NewsID=" & NewsID rs.Open rs.source,conn,1,1 typeid=rs("typeid") Title=trim(rs("Title")) image=rs("image") dim mode set rs11=server.CreateObject("ADODB.RecordSet") rs11.Source="select * from type where typeid="&typeid&" order by typeid" rs11.Open rs11.Source,conn,1,1 mode=rs11("mode") rs11.close set rs11=nothing arr_Content=split(News_Content,"[---分页---]") MaxPages=ubound(arr_Content) %> <% set rs=server.CreateObject("ADODB.RecordSet") rs.Source="select top 5 * from News where NewsID<>"& NewsID & " and (SpecialID=" & SpecialID & " or SpecialID2=" & SpecialID & ") and checkked=1 order by NewsID DESC" rs.Open,conn,1,1 if rs.EOF then Response.Write "" else while not rs.EOF title=trim(rs("title")) title=replace(title,"
","") Response.Write "" rs.MoveNext wend Response.Write "" end if rs.Close set rs=nothing end if '------------------------------------------------------------------------------------------------------------------------------------ Response.Write "" Response.Write "" if about<>"" then sql="select top 5 * from news where (about like '%" & about & "%' or title like '%" & about & "%') and title not like '%" & title & "%' and checkked=1 order by newsid desc" set rs=conn.execute(sql) do while not rs.eof title=trim(rs("title")) title=replace(title,"
","") %> <% rs.movenext loop Response.Write "" else Response.write "" end if 'rs.close set rs=nothing set rs1=server.CreateObject("ADODB.RecordSet") rs1.Source="select top "&reviewnum&" * from review where NewsID=" & NewsID & " and passed=1 order by reviewid desc" rs1.Open rs1.Source,conn,1,1 if rs1.EOF then NoReview=1 Response.Write "" Response.Write "" %> <% if not NoReview then while not rs1.EOF author=server.HTMLEncode(trim(rs1("author"))) email=server.HTMLEncode(trim(rs1("email"))) reviewip=rs1("reviewip") content=trim(rs1("content")) ''content=replace(content,"<","<") ''content=replace(content,">",">") ''content=replace(content,chr(13),"
") ContentLen=len(Content) %> <% rs1.MoveNext wend end if rs1.Close set rs1=nothing conn.close set conn=nothing %>

医院领导


团结奋进的院领导班子

从左至右:副院长、纪委书记 王春秀

     副院长       陈友平

     副院长       徐必生

     党委书记、院长   何正在

     党委副书记、副院长 邓云特

     副院长        陈杰

     副院长       涂乐新

     

何正在:男,天门竟陵人,中共党员,主任医师。1978年3月毕业于湖北省民族学院医学院医疗系,现任天门市第一人民医院党委书记、院长,湖北省消化内镜学会第二届委员会委员,湖北省消化系病学会第四届委员会委员,中华医学会湖北省分会第二十届理事会理事。1992年3月被湖北省卫生厅授予“湖北省卫生系统模范工作者”荣誉称号,1994年和1997年连续两届被天门市政府授予“天门市专业技术拔尖人才”称号,1998年4月被湖北省政府授予“湖北省劳动模范”称号,1999年起被国务院批准享受“政府特殊津贴”,多次受到市委、市政府的表彰和奖励。
  擅长于消化道疾病的诊治,先后在《中华消化内镜杂志》、《实用内科杂志》、《实用癌症杂志》、《美国中华健康卫生杂志》等10多种国内外刊物和国际、国内各级学术会议上发表交流论文50多篇;著有《实用水电解质失衡诊断治疗学》、《常见急诊抢救》等书。科研项目《内窥镜下Nd:YAG激光和微波治疗消化道息肉的研究》被授予湖北省科技成果证书和湖北省卫生厅医学卫生科技成果三等奖,10多个科研项目被天门市政府授予科技成果进步奖。
  1997年被天门市科委授予“天门市科研成果鉴定专家”证书,1998年1月起先后当选为湖北省第九届、第十届人大代表,2003年11月当选为天门市第五届党代表会代表,2004年1月当选为天门市第四届人大代表、天门市人大常委会委员。他所领导的医院连续四年被省委、省政府授予“省级文明医院”称号,2001年被湖北省委、省政府授予“最佳文明单位”称号,1994年被国家卫生部命为二级甲等医院,1998年被命为国际爱婴医院。

邓云特:男,天门渔薪人,中共党员,副主任医师。1983年7月从武汉医学院毕业,2003年6月获武汉科技大学本科文凭,2004年6月华中科技大学生物医学工程专业研究生毕业。曾任市一医团委书记、科教科副科长,现任市一医党委副书记、副院长,天门市第六届医学会检验专业委员会副主任委员。对病理工作有丰富的经验,撰写了25篇论文在《中国医院管理》、《实用癌症杂志》等核心期刊上发表,任《医学心理学》主编,《生理学习辅导》编委。有16个科研项目被评为市级科研成果项目,其中“胃腺囊形态学观察及其与胃癌关系探讨”等2项获得市科技进步二等奖,另有3项获得三等奖。曾获得“优秀党务工作者”、“十佳青年服务标兵”等荣誉称号。

徐必生:男,天门麻洋人,中共党员,副主任医师。1983年7月毕业于武汉医学院。曾任市一医医务科科长,现任市一医党委委员、副院长。市第六届眼耳鼻喉学委会副主任委员、秘书。一直从事耳鼻喉临床工作,所开展的内镜下鼻腔鼻窦肿瘤切除、耳显微外科手术、全喉切除颈廓清扫术、气管异物取出等高难度手术在湖北省同级医院中处于领先水平。在《耳鼻喉学报》等国内各级杂志和学会上发表和交流论文10多篇,其主持的8个科研项目被评为市级科研成果,其中“双径路鼻咽活检在鼻咽癌早期诊断中的价值”获市科技进步一等奖,另有二等奖2项,三等奖3项。工作期间,曾获得“省医务管理先进工作者”、“市优秀党员”等荣誉称号。

陈杰:男,天门张港人,中共党员,副主任医师。1987年毕业于湖北医学院,现任天门市一医党委委员、副院长,天门市第六届外科专业委员会委员。一直从事外科临床工作,擅长胸外、普外常见病及疑难病的诊治,能开展肝癌、肺癌、食管癌根治术及腹腔镜手术。撰写的“ENBD在AOSC诊疗中的应用”等多篇论文在《中华实验外科》、《腹部外科》等刊物上发表。有4个科研项目被评定为市级科研成果。其主持的“肝方叶切除、左右肝管空肠盆式吻合治疗肝门狭窄并肝内胆管结石”等2个项目获市科技进步二等奖。曾获得“十佳服务标兵”、“青年岗位能手”等荣誉称号。

涂乐新:男,天门渔薪人,经济师。1976年12月入伍,1979年3月入党。1986年11月毕业于工程指挥学院经济管理专业。历任工程兵第一0三团三连排长,工程第七维护大队宣传股副连职干事等。1986年12月由军队转业到天门县人民医院,历任天门市一医院人事科副科长、办公室主任、纪委书记、工会主席。2002年8月当选为党委委员、副院长、工会主席。对医院管理颇有见地,撰写的论文《从我院民主管理与民主监督的实践谈院务公开的必要条件和预期效果》等在《中国医院管理》杂志上发表。

陈友平:男,天门小板人,中共党员,副主任医师。1985年7月毕业于同济医科大学,曾任医务科副科长,现任党委委员、副院长、市胆胰疾病诊疗中心秘书长,天门市第六届医学会内科专业委员会委员、秘书。擅长消化道疾病的治疗,在天门市率先成功施行内镜下食管静脉曲张、消化道息肉套扎术以及粗大胃粘膜电切术。撰写论文10多篇在《临床消化病杂志》等核心期刊和学会上发表交流,参与和主持的多个科研项目被评为市级科研成果,其主持的“内窥镜下套扎治胃粘膜脱垂”获市科技进步一等奖,3项获科技进步二等奖。曾获“十佳青年服务标兵”、省、市“防治非典先进个人”等荣誉称号。

王春秀:女,天门杨林人,中共党员,主管护师。1982年8月毕业于天门卫校,1993年8月获湖北医科大学专科学历,湖北医科大学本科在读。1988年4月从卢市卫生院调入天门市人民医院工作。曾任内一科护士长,现任市一医纪委书记、党委委员、副院长,湖北省第十二届护学会理事,天门市第三届护理学会副理事长。从事临床护理及护理管理工作20余年,先后撰写了20多篇论文在各级杂志和学会上发表交流。其主持的“自制负压引流瓶在乳腺癌根治术后的应用”等4个科研项目被评为天门市科研成果项目。工作期间,两次被评为“省优秀护士”,曾获“省、市青年岗位能手”、“市首届十佳护士”、“市‘三八红旗手’”等荣誉称号,2001年当选为湖北省第九次妇代会代表,2003年11月当选为天门市第五届党代会代表。

 

 

 

 

 

 

 没有专题信息
  " & Title & "(" & trim(rs("UpdateTime")) &")[" & rs("click") & "]

相关信息:
 没有相关信息

相关评论:
 
 
<%end if%><%end if%>