global.asax

一个使用vbscript编的简单聊天室程序

Sub Application_Start(ByVal sender As Object,ByVal e As EventArgs)
Application("onlinenum") = 0
Dim objreader As New System