帮忙修改global.asa 代码

来源:百度知道 编辑:UC知道 时间:2024/05/04 11:51:54
global.asa 文件代码在<%=Application("ActiveUsers") %>调用时不显示求助!

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
Application("ActiveUsers") = 0
End Sub

sub Application_OnEnd

End Sub

Sub Session_OnStart
Session.Timeout = 20
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") + 1
Application.UnLock
End Sub

Sub Session_OnEnd
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") - 1
Application.UnLock
End Sub

</SCRIPT>
语言:asp.net

我给测试了下,代码完全没有问题,也没出现你说的问题.你是不是操作有误?操作顺序如下:1.新建一个网站 2 右键点击网站,选择添加新项,选择添加全局类. 3.然后在此文件中,将你的代码分别复制到相应的函数中.4.在网站的调用页面用:<%=Application("ActiveUsers")%> 显示. 按这样的操作步骤 应该没有问题的.

global.asa 文件代码在<%=Application("ActiveUsers") %>调用时不显示求助!

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
Application("ActiveUsers") = 0
End Sub

sub Application_OnEnd

End Sub

Sub Session_OnStart
Session.Timeout = 20
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") + 1
Application.UnLock
End Sub

Sub Session_OnEnd
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") - 1
Application.UnLock
End Sub

不显示?

a