global.asaôڲҪĿ¼֧Ӧô 
һµȻҪҵʵĻȥglobal.asaӦ 
login.aspм 
if Application("hxf_c_chatroomname")="" then 
'ڴ˲sub Application_OnStartеĲ 
end if 
ΪʲôҪifжϣʵԲáϵͳûʵʱķӦǿܻһϴ֮ǰⲻõĻǽʹ 
ôSub Session_OnEnd--->˴ӦøΪSession.OnStart(ɱָ)أȻѡcheck.aspеSession("h xf_u_nickname")ֵ֮ǰ 
ͬʱsession.timeout=3Ϊsession.timeout=Application("hxf_c_maxtimeout") 

Ȼûglobal.asa޷׽Session_OnEnd 
뻹ò˵ʱ쳣رպͶߣ벻÷ 
ôһȻӦʵʱsay.aspмʱ 
for i=1 to onlinenum step 6 
--if online(i+1)=nickname then 
----online(i+4)=sj2 
----exit for 
--end if 
next 
ʵҲonline(i+5)Ҳ֪ĸŴʱ䣬ĸ˵ʱһ 

ȻҪʱ߳ˣf3.aspģ¸죬ʵҲsay.aspt.aspʵ֣ 
for i=1 to onlinenum step 6 
--datedifftmp=DateDiff("n",online(i+4),nowtime) 
--if datedifftmp<Application("hxf_c_maxtimeout") then 
----Response.Write "<script language=javascript>parent.f1.document.write('line3:"&datefmt&"now:"&nowtime&"diff:"&datedifftmp&"<br>');</s cript>" 
----response.write "<script Language=Javascript>parent.f1.document.write(' 0:"&online(i)&" 1:"&online(i+1)&" 2:"&online(i+2)&" 3:"&online(i+3)&" 4:"&online(i+4)&" 5:"&online(i+5)&"<br>');</script>" 
----onliners=onliners+1 
----useronlinename=useronlinename&" "&online(i+1) 
----Redim Preserve newonlinelist(js),newonlinelist(js+1),newonlinelist(js+2),newonlinelist(js+3),newonlinelist(js+4),newonlinelist(js+5) 
----newonlinelist(js)=online(i) 
----newonlinelist(js+1)=online(i+1) 
----newonlinelist(js+2)=online(i+2) 
----newonlinelist(js+3)=online(i+3) 
----newonlinelist(js+4)=online(i+4) 
----newonlinelist(js+5)=online(i+5) 
----js=js+6 
--end if 
next 
useronlinename=useronlinename&" " 
Application.Lock 
if onliners=0 then 
dim listnull(0) 
Application("hxf_c_onlinelist")=listnull 
else 
Application("hxf_c_onlinelist")=newonlinelist 
end if 
Application("hxf_c_useronlinename")=useronlinename 
Application("hxf_c_chatrs")=onliners 
Application.UnLock 
˺ǿӴԹˣ֪ûУҲӦڳʱʱʾʾˣӵĻӦ 
else 
Dim newsd(540) 
j=1 
for ii=10 to 540 step 9 
newsd(j)=sd(ii) 
newsd(j+1)=sd(ii+1) 
newsd(j+2)=sd(ii+2) 
newsd(j+3)=sd(ii+3) 
newsd(j+4)=sd(ii+4) 
newsd(j+5)=sd(ii+5) 
newsd(j+6)=sd(ii+6) 
newsd(j+7)=sd(ii+7) 
newsd(j+8)=sd(ii+8) 
j=j+9 
next 
newsd(532)=line+1 
newsd(533)=1 
newsd(534)=0 
newsd(535)=online(i+1) 
newsd(536)="" 
newsd(537)="660099" 
newsd(538)="660099" 
newsd(539)="" 
newsd(540)="<font color=black>桿</font><font color=F08000>" & Replace(Application("hxf_c_userdown"),"%%","<font color=black>" & online(i+1)& "</font>") & "</font><font class=t>(" & t & ")</font>" 
application.lock 
Application("hxf_c_sd")=newsd 
application.unlock 


ԿҲĻҵĺ 
Session_OnEnd 

Application_OnEndû 

ͷʲôõأҪõԵʱ⣬̫ôʱ޷֪ûǷߣˣǻڵĲʱ䳬A pplication("hxf_c_maxtimeout") ,Ҳ̫ãʱ̶̫û㣬𣬵ⲻҵˣĲ 

"Sub Session_OnEndأȻѡcheck.aspеSession("hxf_u_nickname")ֵ֮ǰ 
ͬʱsession.timeout=3Ϊsession.timeout=Application("hxf_c_maxtimeout") " 
Ӧøĵsession_onstart 


--------------------------------------------------------------------------------


һûʱ䣬ϵͳΪ10ӵߣô˲˳10ӾͻߣΪûĿ¼ϵͳ޷ԤûǷĵˣ 
Ըsession.timeout=Application("hxf_c_maxtimeout") û 

f3еĲָҪôҪôf1ֱ룿ǲá 
˵˵ɣtⲻ󣬵һf3ôġ 
--------------------------------------------------------------------------------


ȷǼӴ˵طͶ 

ȥfor nextе 
response.write 
