%
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
%>
|
|
|
| ||||
编者按:在5月16日下午举行的小学二年级家长会上,二(2)班张茁莹同学的爸爸叙述了孩子成长的经历,倾诉了对育英学校的感激之情,道出了育英学校家长的心声。他的讲话不时被两百多位家长的热烈掌声打断,给大家留下了深刻的印象。现经张兴明先生本人同意,特发布他的讲话全文。 育英,我们感谢你 张茁莹的家长 张兴明 认识你育英,已是很久以前的事了,我穿过绿油油的稻田走进绿树成荫的校园,小路弯弯,河水弯弯,与错落有致教室相连。红色的运动场,紫藤缠绕的小石凳花园,还有童话城堡中跑出来的孩子们开心的笑脸,啊!美丽的校园,美得都让我想回到童年。 特约通讯员:汪培坚
推荐
| |||||
| | |||||
| |||||