%
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
%>
|
|
|
| ||||
|
"温馨家园"洋溢浓郁温馨 12月31日晚,在育英体育馆二楼,高级中学"温馨家园"大型综艺晚会在富有日本风味的舞蹈《北国之春》的音乐声中拉开了帷幕。晚会现场气氛活跃,流溢着浓浓的家庭气息。 当4位主持人宣布晚会正式开始的时候,台下汹涌着雷鸣般的掌声,一出场,热烈的气氛便感染着每一个人。综艺晚会的节目五彩斑斓,多姿多彩。街舞《爱的主打歌》欲使同学们在动感的音乐声中动起来;话剧《王子与灰姑娘》的幽默、诙谐、轻松,逗得台下观众哈哈大笑;小品《一张考卷》及《理解,在醒来的清晨》体现了家庭的矛盾,霎时又使大家陷入深深的沉思之中,给予了我们无限的启示;表演唱《阳光总在风雨后》轻洒她们的点滴祝福,在昏黄的烛光中显得浪漫异常。而"温馨时刻"的到来使大家倍感育英大家庭的温馨与亲切,离开母校的高三育英学子发来手机短信句句真诚,在校同学对育英声声祝福都表达了他们对学校深深的眷恋和感激之情。此时此刻,台下又是多么的安静,在新年的钟声敲响之际,他们亦在祝福育英事业更加兴旺蓬勃。而压轴戏时装秀《魅力数学》更将晚会推向了高潮,那五彩缤纷的纸缝制而成的衣裳在灯光的照耀下,显得分外炫丽夺目。另外的助兴节目也在浓郁的气氛中添了一份欣喜。紧接着的是篮球、足球、水果拼盘、晚会节目等的颁奖仪式。
在柔美的《同一首歌》的音乐声中,演员们在礼仪同学的带领下上台谢幕,主持人们也怀着激动的心情祝全体师生新年快乐。愿育英大家庭永远和美幸福,在新的一年里更加美丽灿烂,来年的春天与你相约! 高级中学学生会 晚会掠影:
| |||||
| | |||||
| |||||