<!--#include file="uft8.asp"-->
<%
t=0
o=0
For k= 0 To Application("total")
if DateDiff("s",Application("now_"&k),Now)<7  Then
t=t+1
end if
Next

if cint(Request.Cookies("total"))<cint(Application("total"))  Then
shangxian=Application("site_"&Application("total"))
sxname=Application("name_"&Application("total"))
Response.Cookies("total")=Application("total")
o=1
end if

Application.Lock
Application("online")=t
Application.UnLock
%>
&online=<%=Application("online")%>&shangxian=<%=jiema(shangxian)%>&sxname=<%=sxname%>&on1=<%=o%>&