%
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
%>
|
|
|
| ||||
我校又一批电脑科技创新作品获市级奖 从市教育局、市科技局等部门传来喜讯,我校又一批电脑、科技创新发明、科技论文、科幻绘画等作品在温州市第6届青少年科技节及温州市第18届青少年科技创新大赛中获得好成绩。他们是:小学六年级陈志远同学获市第6届青少年科技节小学生电脑"手抄报"一等奖;小学6年级孙天烽、翁贤程两同学分别获二等奖;初一学生金洋洋、初二学生时晨分别获市第6届青少年科技节现场网页制作三等奖;小学五年级林辰霞同学获市第18届青少年科技创新大赛科幻绘画二等奖;小学五年级林超、郑国慰、郑李蜜、四年级金璐璐等分别获科幻绘画三等奖;高中分校两项作品分别获市第18届青少年科技创新大赛二、三等奖。我校同时被评为第十八届科技实践活动及科幻绘画团体二等奖。 据了解,该两项大赛温州市每年举行一次,它是我市目前面向在校中小学生规模最大、层次最高的具有示范性和导向性的青少年科技教育活动之一,竞赛学科涵盖中小学全部内容,旨在推动青少年科技活动的蓬勃开展,培养青少年的创新精神和实践能力,提高青少年的科技素质。 育英电视台:胡勇 | |||||
| | |||||
| |||||