%
function changechr(str)
changechr=replace(replace(replace(replace(str,"<","<"),">",">"),chr(13),"
")," "," ")
changechr=replace(replace(replace(replace(changechr,"[sayyes]","
"),"[red]",""),"[big]","")
changechr=replace(replace(replace(replace(changechr,"[/sayyes]",">"),"[/b]",""),"[/red]",""),"[/big]","")
end function
news_xxbh=request("news_xxbh")
news_xxlb=request("news_xxlb")
ttt=request("ttt")
set rs=server.createobject("adodb.recordset")
sql="select * from tab_type where type_lbbh="&news_xxlb
rs.open sql,conn,1,1
type_lbmc=rs("type_lbmc")
'unit_cname=rs("unit_cname")
'unit_dwqx=rs("unit_dwqx")
'unit_dwjj=rs("unit_dwjj")
rs.close
%>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from tab_news where news_xxbh="&news_xxbh
rs.open sql,conn,1,1
news_xxbt=changechr(rs("news_xxbt"))
news_xxnr=changechr(rs("news_xxnr"))
news_lydw=changechr(rs("news_lydw"))
news_tpsm=changechr(rs("news_tpsm"))
nian=cint(left(cstr(rs("news_djsj")),4))
yue=cint(mid(cstr(rs("news_djsj")),5,2))
ri=cint(mid(cstr(rs("news_djsj")),7,2))
set rs1=server.createobject("adodb.recordset")
sql1="select * from tab_unit where unit_dwbh="&news_lydw
rs1.open sql1,conn,1,1
unit_dwmc=rs1("unit_dwmc")
rs1.close
%>
福建省科学技术厅
| |
|
|
|
 |
|
|
 |
|
|
|
|
福建省市、县科技进步考核工作
|
|
一、全国市、县、区的科技进步进行考核为两年一评。
二、各参评市、县、区根据《市、县、区科技进步考核办法 ( 试行 ) 》要求进行申报;申报材料根据《市、县、区科技进步考核指标体系》和《市、县、区科技进步考核表》要求填报,并附相关的证明材料。
三、省科技厅于考核当年 3 月 1 日前将参加当年考核市、县、区名单报科技部;组织考核组采取数据核查、会议评审和实地考察相结合的方法进行考核。 9 月 20 日完成全部考核工作; 7 月底前将考核结果及各项材料报送科技部。 ( 具体时间若有变动依科技部文件为准 )
四、经省考核合格的上报科技部复审批准。在考核当年,科技部根据省科技厅推荐评出 “ 全国科技进步先进市 ”( 比例暂不限制 ) 和 “ 全国科技进步先进县 ( 市、区 )”( 比例占当年通过考核总数的 30%) 。
( 二○○二年一月 )
|
 |
 |
| |
 |
 |
 |
|
|