ASP Application 对象

在一起协同工作以完成某项任务的一组 ASP 文件称为一个应用程序。

Application 对象

Web 上的一个应用程序可以是一组 ASP 文件。这些 ASP 文件一起协同工作来完成某项任务。ASP 中的 Application 对象用于把这些文件捆绑在一起。

Application 对象用于存储和访问来自任何页面的变量，类似于 Session 对象。不同之处在于，所有的用户分享一个 Application 对象，而 Session 对象和用户的关系是一一对应的。

Application 对象存有会被应用程序中的许多页面使用的信息（比如数据库连接信息）。可以从任何的页面访问这些信息。同时您也可以在一个地方改变这些信息，随后这些改变会自动反映在所有的页面上。

存储和取回 Application 变量

Application 变量可被应用程序中的任何页面访问和改变。

您可以在 "Global.asa" 中创建 Application 变量，如下所示：

<script language="vbscript" runat="server">

Sub Application_OnStart
application("vartime")=""
application("users")=1
End Sub

</script>

在上面的实例中，我们创建了两个 Application 变量："vartime" 和 "users"。

您可以访问 Application 变量的值，如下所示：

There are
<%
Response.Write(Application("users"))
%>
active connections.

遍历 Contents 集合

Contents 集合包含着所有的 application 变量。您可以通过遍历 Contents 集合，来查看其中存储的变量：

<%
dim i
For Each i in Application.Contents
Response.Write(i & "<br>")
Next
%>

如果您不知道 Contents 集合中的项目数量，您可以使用 Count 属性：

<%
dim i
dim j
j=Application.Contents.Count
For i=1 to j
Response.Write(Application.Contents(i) & "<br>")
Next
%>

遍历 StaticObjects 集合

您可以通过遍历 StaticObjects 集合，来查看存储在 Application 对象中的所有对象的值：

<%
dim i
For Each i in Application.StaticObjects
Response.Write(i & "<br>")
Next
%>

锁定和解锁

您可以使用 "Lock" 方法来锁定应用程序。当应用程序锁定后，用户们就无法改变 Application 变量了（除了正在访问 Application 变量的用户）。您还可以使用 "Unlock" 方法来解锁应用程序。这个方法会移除对 Application 变量的锁定：

<%
Application.Lock
'do some application object operations
Application.Unlock
%>