取得Application 對象變量的語法如下所示:
變數=Application("變量名稱")
接下來我們來實際操作Application 變量。下列范例宣告了三個Application 對象變量,利用循環顯示后并清除:
<Html>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim shtI As Short
Application.Add("App1","Value1")
Application.Add("App2","Value2")
Application.Add("App3","Value3")
For shtI=0 To Application.Count-1
Response.Write("變量名:" & Application.GetKey(shtI) )
Response.Write(" ,變數值:" & Application.Item(shtI) & "<P>")
Next
Application.Clear()
End Sub
</Script>
</Html>