ASP的Application对象

Application对象是一个应用程序级的对象，用在所有用户间共享信息，并可以在Web应用程序运行期间持久地保持数据。

（1）Application的属性

Application对象没有内置的属性，但是可以自行创建其属性。使用<% Application("属性名")=值 %> 。其实大部分Application变量都存放在Contents集合中，当用户创建一个新的Application变量时，其实就是在Contents集合中添加了一项。下面两个脚本是等效的： <%Application("greeting")="hello!" %> 或 <%Application.contents("greeting")="hello!" %>。

由于Application变量存在集合里，所以如果想要全部显示，则需要进行多次循环使用。例如For Each循环：

<%For Each item IN Application.Contents
                        Response.write("<br>"&item&Application.Contents(item))
                 Next
         %>

（2）Application的方法

Application的方法包括：Lock和Unlock。其中Lock方法用于保证同一时刻只能有一个用户对Application操作；Unlock则用于取消Lock方法的限制。如：

<%
                  Application.Lock
                  Application("visitor_num")=Application("visitor_num")+1
                  Application.Unlock
         %>

（3）Application的事件

1）Application_OnStart()：当事件应用程序启动时触发。

2）Application_OnEnd()：此事件应用程序结束时触发。

这两个事件过程都是必须定义在Global.asp文件中，一般把连接数据的函数定义在这两个事件，然后放在Global.asp中。例如：

Sub Application_OnStart
                  Application("tt18_ConnectionString") = "driver={SQL Server};server=jeff;uid=sa; pwd=;database=test" 
        End Sub

一个数组能够被定义成Application对象，不过这个数组只能作为一个对象保存，而不能用Application(0)取出其值。此时可以定义一个临时数组实现这种功能，如：

<%
         dim Array()
         Array=Application("array")
         for i = 0 to ubound(array)
                  Response.write Array(i)
         next I
       %>