<% 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日10:20 打印 关闭
  为促使广大青少年树立学科学、爱科学、用科学的思想,提高青少年的创新意识和动手实践能力,为建设创新型、节约型国家奠定科技人才基础,中国科协青少年科技中心、中央电视台少儿频道《神奇之窗》栏目组,在2008年联合组织"青少年科学命题创意挑战赛"。
  活动期间将组织各地区青少年参与一系列特定主题的科学创意活动,创意主题要具备趣味性、新奇性和实现方式的多样性,适合中小学生参与和独立完成。活动评选出的优秀科学命题创意将在中国数字科技馆、中央电视台少儿频道进行展示和播出。
(责任编辑: 郭爽 )
版权所有:中国互联网协会网络科普联盟·2004 京ICP备05020248号
联系地址:北京市海淀区学院南路86号 邮政编码:100081
未经书面特别授权,请勿转载或建立镜像