global.asax

来自「这是用java做的一音像电教资料管理系统.很好用的..特别是对音乐爱好者」· ASAX 代码 · 共 24 行

<SCRIPT LANGUAGE=VB RUNAT=SERVER>
sub application_onstart
	application.lock
	application("pagehit0")=0
	application("allhit")=0
	application("alluser")=0
	application("currentuser")=0
                   application.unlock
end sub
sub session_onstart
	application.lock
                   session("online")=false
	application("alluser")=application("alluser")+1
	application("currentuser")=application("currentuser")+1
	application.unlock
end sub
sub session_onend
	application.lock
	application("currentuser")=application("currentuser")-1
	application.unlock
end sub
</SCRIPT>
<OBJECT RUNAT=SERVER SCOPE=SESSION ID=objFSO PROGID="Scripting.FileSystemObject">
</OBJECT>