<%set rs=server.createobject("adodb.recordset") sql="select count(*) as sum1 from 通知通告 where location='企业信息化管理'" rs.open sql,conn,2,2 sum1=rs("sum1")+1 rs.close sql="select count(*) as sum2 from 通知通告 where location='企业信息化交流'" rs.open sql,conn,2,2 sum2=rs("sum2") rs.close set connaccess=server.createobject("adodb.connection") DBPath = Server.MapPath("../bbs/bbs/data/bbs.mdb") connaccess.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath sql="select count(*) as sum3 from bbs where owner='A106'" rs.open sql,connaccess,2,2 sum3=rs("sum3") rs.close %>
    欢迎访问山西省企业技术创新网 ! 
 加入收藏
 设为主页
 关闭窗口
           通知通告    技术中心     科技型中小企业    新产品     新工艺新技术     重点项目推荐     国家项目推荐     关于我们
当前位置:科技型中小企业

 

 

 

 
  有关科技型中小企业通知、文件
 科技型中小企业名单