global.asax

来自「一个关于asp.net的源码」· ASAX 代码 · 共 14 行

<Script Language="VB" RunAt="Server">
  Sub Application_OnStart(Sender As object,e As EventArgs)
      '建立用户列表
      Dim user(20) As String
      Application("user")=user
      Application("UserNum")=0
      '预置20笔聊天记录
      Dim chats(20) As String
      Application("chats")=chats
      '当前记录数
      Application("Current")=0
End Sub
</Script>