<อ้างอิงประยุกต์ใช้วัตถุที่สมบูรณ์
คอลเลกชันสารบัญมีรายการทั้งหมดที่ผนวกเข้ากับแอพลิเคชัน / เซสชั่นผ่านคำสั่งสคริปต์
Tip: ในการลบรายการจากคอลเลกชันสารบัญใช้ลบและวิธีการ RemoveAll
วากยสัมพันธ์
Application.Contents(Key)
Session.Contents(Key)
| พารามิเตอร์ | ลักษณะ |
|---|---|
| key | จำเป็นต้องใช้ ชื่อของรายการเพื่อดึง |
ตัวอย่างสำหรับวัตถุแอพลิเคชัน
ตัวอย่างที่ 1
ขอให้สังเกตว่าทั้งชื่อและ objtest จะได้รับการผนวกเข้ากับคอลเลกชันสารบัญ:
<%
Application("name")="w3ii"
Set Application("objtest")=Server.CreateObject("ADODB.Connection")
%>
ตัวอย่างที่ 2
ห่วงผ่านคอลเลกชันสารบัญ:
<%
for each x in Application.Contents
Response.Write(x & "=" & Application.Contents(x) & "<br>")
next
%>
or:
<%
For i=1 to Application.Contents.Count
Response.Write(i & "=" & Application.Contents(i) & "<br>")
Next
%>
ตัวอย่างที่ 3
<%
Application("date")="2001/05/05"
Application("author")="w3ii"
for each x in Application.Contents
Response.Write(x & "=" & Application.Contents(x) & "<br>")
next
%>
Output:
date=2001/05/05
author=w3ii
ตัวอย่างสำหรับวัตถุเซสชัน
ตัวอย่างที่ 1
ขอให้สังเกตว่าทั้งชื่อและ objtest จะได้รับการผนวกเข้ากับคอลเลกชันสารบัญ:
<%
Session("name")="Hege"
Set Session("objtest")=Server.CreateObject("ADODB.Connection")
%>
ตัวอย่างที่ 2
ห่วงผ่านคอลเลกชันสารบัญ:
<%
for each x in Session.Contents
Response.Write(x & "=" & Session.Contents(x) & "<br>")
next
%>
or:
<%
For i=1 to Session.Contents.Count
Response.Write(i & "=" & Session.Contents(i) & "<br>")
Next
%>
ตัวอย่างที่ 3
<%
Session("name")="Hege"
Session("date")="2001/05/05"
for each x in Session.Contents
Response.Write(x & "=" & Session.Contents(x) & "<br>")
next
%>
Output:
name=Hege
date=2001/05/05
<อ้างอิงประยุกต์ใช้วัตถุที่สมบูรณ์