GLOBAL.ASA

< SCRIPT LANGUAGE="VBSCRIPT" RUNAT="SERVER">

Sub Application_onStart
dim c_info(240)
c_info(0)=1
for i=1 to 240
c_info(i)=""
next
Application("c_info")=c_info
Application("c_Lid")=0
End sub

Sub Application_onEnd
End sub

Sub Session_onStart
End sub

Sub Session_onEnd
End sub

< /Script >