global.asa

来自「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习 的好资料」· ASA 代码 · 共 13 行

<script language=VBScript runat=server>
sub session_onstart				'统计在线人数，每进来1人count1加1
application.lock
application("count1")=application("count1")+1
application.unlock
end sub
sub session_onend				'统计在线人数，每离开1人count1减1
application.lock
application("count1")=application("count1")?1
application.unlock
end sub
</script>