Application.Contents("key") 與 Application("key") 等價。實作雙語討論區計數器:
name = Request.Form("visitor")
i = Request.Form("chatno")
If i = 0 Then
Application("Chinese") = Application("Chinese") + 1
chat = "中文"
Else
Application("English") = Application("English") + 1
chat = "英文"
End If
儲存 <OBJECT SCOPE="Application"> 宣告的物件實例:
<OBJECT RUNAT="Server" SCOPE="Application" ID="AdRot" PROGID="MSWC.AdRotator"></OBJECT>
遍歷集合:
For Each obj In Application.StaticObjects
Response.Write obj & ": " & Application.StaticObjects(obj) & "<br>"
Next
建立陣列 → Lock → 存入 → Unlock → Server.Transfer → 接收頁複製陣列 → 修改 → Lock → 寫回 → Unlock,展示跨請求生命週期的資料共享模式。