%
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
%>
|
|
|
| ||||
|
名师引路,探索课改新航向
小学分校语文课程改革步入理性实践阶段 10月22日上午,在语文课程改革中享有一定知名度的语文特级教师朱瑛,在四(3)班以人教版《跨越海峡的生命桥》为载体,连续两节课为教师们演绎了新课程背景下"学生是学习的主人--以学定教,顺学而导"的课程理念及课堂教学艺术。同日晚上,语文课程改革研究中心全体成员在少先队活动室举行了教学沙龙活动,针对朱老师的课堂教学进行了热烈的研讨。 小学分校特约通联员:丁时辉 活动照片:
| |||||
| | |||||
| |||||