asp如何在第10000名来访者访问时显示中奖页面？

如何在第10000名来访者访问时显示中奖页面？

看看下面的代码：

< SCRIPT LANGUAGE=VBScript RUNAT=Server >
Sub Application_OnStart
Application("SessionCount") = 0
End Sub
Sub Session_OnStart
Application.Lock
Application("SessionCount") = Application("SessionCount") + 1
Application.Unlock
If Application("SessionCount") > 10000 Then
Application.Lock
Application("SessionCount") = 0
Application.Unlock
' 此处放置你想要运行的代码,但不要有< ％ ％ >标签
End if
End Sub
< /SCRIPT >