一、使用 Contents 集合應用程序信息
1、Contents 集合是由所有通過腳本語言添加到應用程序的變量和對象組成的集合。可以使用這個集合來獲得給定的應用程序作用域的變量列表或指定某個變量為操作對象。Contents 集合是 Application 對象默認的集合，因此下述兩種格式是等價的：
Application.Contents("變量名")
Application("變量名")
其中，“變量名”是需要操作的 Application 變量名稱。
2、實例代碼（1.asp)：使用 Session 對象編寫一個簡單的計數器程序。
<html>
<head><title>>Application.Contents集合的應用</title>
</head>
<body>
<center><h3>Application實例</h3><hr width="70%"></center>
<%
name=Request.Form("visitor")
i=Request.Form("chatno")
if name<>"" then
if i=0 then
Application("chinese")=Application("Chinese")+1
chat="中文"
elseif i=1 then
Application("English")=Application("English")+1
chat="英文"
end if
Response.write "<center>歡迎<b>" & name & "</b>,你是來到"
Response.write "<b>" & chat & "</b>討論區的第"
if chat="中文" then
Response.write Application.Contents("Chinese") & "位客人。<p>"
else
Response.write Application.Contents("English") & "位客人。<p>"
end if
Response.write "<a href='4-6-2.asp'>返回</a></center>"
Response.end
end if
%>
<center>
<form method=post>
<table><tr><td>名字：<td><input type=text name="visitor" size=12>
<tr><td>討論區：<td><Select name="Chatno">
<option value=0>中文</option>
<option value=1>英文</option>
</select>
<input type=submit value="確定">
</table>
</form>
</center>
</body>
</html>
二、使用Application.StaticObjects 集合保存應用程序信息
Application 對象的StaticObjects 集合包含所有的在應用程序范圍內使用 OBJECT 標記創建的對象，可以使用該集合確定某對象的指定屬性的值或遍歷集合及檢索所有靜態對象的所有屬性。
1、StaticOBjects 集合的語法格式：
Application.StaticObjects(key)
其中參數 Key 指定要檢索的項目值。
2、創建具有會話作用域的對象：
在 global.asa 文件中，使用 OBJECT 標記並將 SCOPE 屬性設置為 “Application" 可以創建有應用程序作用域的對象。例如：
<OBJECT RUNAT=”Server" SCOPE="Application" ID=ID PROGID="MSWC.AdRotator"></OBJECT>
4、不能在 Application 對象中存儲內建對象。例如，下面每一行腳本都將返回錯誤。
<%
set Application("varl")=Session
set Application("var2")=Request
set Application("var3")=Response
set Application("var4")=Server
set Application("var5")=Application
%>
三、使用 Application 對象存儲數組
也可以將一個數組存儲在 Application 對象中，但不要直接更改存在 Application 數組中的元素。例如，下在的腳本無法運行。
<% Application ("StoredArray") (3)="new value" %>
實例代碼（2.asp) 創建一個數組
<% @ language="vbscript" %>
<html>
<head>
<title>Application 數組應用示例 </title></head>
<body>
<%
dim poem() '創建一個數組
Redim poem(3) '為數組分配存儲空間
poem(0)="姓名：含笑" '為數組進行初始化
poem(1)="性別：女"
poem(2)="E-mail:[email protected]"
Application.Lock '鎖定Application 對象
Application("StoredArray")=poem '將數組存儲到 Application 對象中
Application.Unlock '解除對Application 對象的鎖定
Server.Transfer"3.asp" '調用另外一個.asp文件
%>
</body>
</html>
3.asp頁碼：將Application 數組復制給一個本地數組並輸出到客記端, 然後，修改本地數組元素的值並輸出到客戶端，最後 ，將本地數組存儲到Application對象中。
<%
'將Application 數組復制給一個本地數組並輸出到客記端
LocalArray=Application("StoredArray")
Response.Write "<Div Align=center>"
For Each s in LocalArray
Response.write s & "<br>"
next
Response.write "<hr width='50%' color='#cc9999'><p>"
'修改本地數組元素的值並輸出到客戶端
LocalArray(0)="姓名：難書"
LocalArray(1)="性別：女"
LocalArray(2)="E-mail:[email protected]"
For each s In LocalArray
Response.write s & "<br>"
next
Response.Write "</div>"
'將本地數組存儲到Application對象中
Application.lock
Application("StoredArray")=LocalApplication
Application.Unlock
%>
