相关代码 |
|
if not isarray(session("dv_user")) then Response.End
dv_user=session("dv_user")
userline=dv_user(1)
sd=Application("chat_sd")
newuserline=0
for i=1 to 50 step 2
newuserline=sd(i)
if sd(i)>userline then
Response.Write ""&sd(i+1)&""
end if
next
if newuserline>userline then dv_user(1)=newuserline
session("dv_user")=dv_user
Response.Write "setTimeout('this.location.reload();',3000);"
Response.End
%>