<% Set Conn = ConnectDataBase() function getChildTid(tid) classidstr = "" strsql = "select typeid from usip_news_type where f_id="&tid set objrs = server.createobject("adodb.recordset") objrs.open strsql,conn,1,1 if not objrs.eof then for i = 1 to objrs.recordcount if objrs.eof then exit for classidstr = classidstr & Cstr(objrs("typeid")) if i <> objrs.recordcount then classidstr = classidstr & "," end if objrs.movenext next else classidstr = tid end if objrs.close set objrs = nothing getChildTid = classidstr end function %> <%Sub showarticlelist(num,tid) %> <% sql = "select top "&num&" title,html_path from usip_news where typeid in("&tid&") and ischeck=1 and ispub=1 order by pub_time desc" set rs = conn.execute(sql) do while not rs.eof temptitle = rs("title") if len(temptitle) > 10 then temptitle = left(temptitle,10) & "..." end if %> <% rs.movenext loop rs.close set rs = nothing %>
<% end sub %>
用户登陆
  用户名:  
  密 码:  
用户注册
相关链接
知识库

  第二届全国青少年网络科普行系列活动 >> 中青报-中青在线:第二届全国青少年网络科普行启动

中青报-中青在线:第二届全国青少年网络科普行启动

2008年4月1日14:42 打印 关闭
    本报北京1月22日电(记者孙晔)今年寒假哪里去?数字馆里做实验。由中国互联网协会网络科普联盟、团中央“我们的文明”主题系列活动组委会主办的“第二届全国青少年网络科普行系列活动”今日在京启动。

    本次活动为期9个月,从即日开始,到10月结束。刚刚荣获“世界信息峰会大奖”的中国数字科技馆是此次活动的网上主平台。活动围绕“节约资源能源、保护生态环境”的主题,开展网上科学实验、科普Flash作品征集展播、科普图片征集、青少年科学命题创意挑战赛等活动,全国各地青少年均可参加。为了提高活动质量,组委会还将对参加活动的100所中、小学校教师结合网上科学实验、科普Flash制作等进行培训,向青少年提供中国数字科技馆的有关资料,掀起2008年网络科普宣传的热潮。

    据了解,中国数字科技馆2007年年初开始试运行,已建成22个博览馆、14个科普专栏、20个体验区。

来源:中青报-中青在线
(责任编辑: 郭爽 )
版权所有:中国互联网协会网络科普联盟·2004 京ICP备05020248号
联系地址:北京市海淀区学院南路86号 邮政编码:100081
未经书面特别授权,请勿转载或建立镜像