%
set counter=server.createobject("mswc.counters")
counter.increment(counts)
'response.buffer=true
sub gcounter
picture=slt
picnum=6
'POWERED BY SLIGHTBOY
set conn=Server.CreateObject("ADODB.connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("..\database\tj.mdb")
Set rs=Server.CreateObject("ADODB.Recordset")
sql= "select * from data where id=1"
rs.open sql,conn,3,3
'防刷代码开始
ip=Request.ServerVariables("REMOTE_ADDR")
'比对新老IP
if not ip=session("OldIp") then
session("OldIp")=ip
rs("counter")=rs("counter")+1
rs.update
counternum=rs("counter")
rs.close
else
counternum=rs("counter")
rs.close
end if
counternum=cstr(counternum)
response.write counternum
' digits=6
' for i=digits-1 to 0 step -1
' temp=fix(counternum/10^i)
' response.write ""
' counternum=counternum-temp*10^i
' next
end sub
%>
|
|
|
| ||||
|
我校举行"青少年科技创新教育知识"大型报告会 9月19日,我校特邀上海市科普研究所创新思维研究室主任、《动手做》报副主编宇宙教授,在学校多媒体教室为300多名师生作"青少年科技创新教育知识大型报告"。宇教授通过实物投影展示了:圆形折叠式说明书、玫瑰说明书、折叠纸杯、钱包式烟灰缸、拇指手表、圆珠笔中的谜宫游戏、眼镜式望远镜等四十多种青少年科技创新实物作品。多种多样的创造发明作品和宇宙教授幽默、风趣、生动的讲解,深深吸引了全体师生,在2个半小时的时间里,同学们不时报以"啊、啊"的惊叹声和热烈的掌声。本次讲座使师生深受启发,科技创新思维要灵活,不呆板,提倡生活体验的思考,大胆提出问题,研究探索问题,不仅要动脑,还要动手去解决。正如查尔萨斯所说:每个孩子都是科学家,每个孩子都应该向科学家那样去学习、去发现、去探究。教师应解放思想,转变观念,勇于创造,为学生提供更多选择的空间。宇宙教授的讲解给师生以深刻的启迪。
(教科室) 活动照片:
| |||||
| | |||||
| |||||