ASP 網頁設計 技巧
Dictionary 對象
指定的鍵存在嗎？
本例演示點可以首先創建一個Dictionary對象，然後使用Exists方法來檢查指定既鍵有冇存在。
本實例代碼如下：
<html>
<body>
<%
dim d
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
if d.Exists("c")= true then
Response.Write("鍵存在。")
else
Response.Write("鍵不存在。")
end if
set d=nothing
%>
</body>
</html>
本實例運行結果如下：
鍵存在。
返回一個所有項目的陣列
本例演示如何使用Items方法來返回所有項目的一個陣列。
本實例代碼如下：
<html>
<body>
<%
dim d,a,i,s
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
Response.Write("<p>項目的值是：</p>")
a=d.Items
for i = 0 To d.Count -1
s = s & a(i) & "<br>"
next
Response.Write(s)
set d=nothing
%>
</body>
</html>
本實例運行結果如下：
項目的值是：
China
Italy
返回一個所有鍵的陣列
本例演示如何使用Keys方法來返回所有鍵的一個陣列。
本實例代碼如下：
<html>
<body>
<%
dim d,a,i,s
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
Response.Write("<p>鍵的值是：</p>")
a=d.Keys
for i = 0 To d.Count -1
s = s & a(i) & "<br>"
next
Response.Write(s)
set d=nothing
%>
</body>
</html>
本實例運行結果如下：
鍵的值是：
c
i
返回某個項目的值
本例演示如何使用Item屬性來返回某個項目的值。
本實例代碼如下：
<html>
<body>
<%
dim d
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
Response.Write("項目 i 的值是：" & d.item("i"))
set d=nothing
%>
</body>
</html>
本實例運行結果如下：
項目 i 的值是：Italy
設置一個鍵
本例演示如何使用Key屬性來在Dictionary對象中設置一個鍵。
本實例代碼如下：
<html>
<body>
<%
dim d
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
d.Key("i") = "it"
Response.Write("鍵 i 已設置為 it，其值是：" & d.Item("it"))
set d=nothing
%>
</body>
</html>
本實例運行結果如下：
鍵 i 已設置為 it，其值是：Italy
返回鍵/項目對的數目
本例演示如何使用Count屬性來返回鍵/項目對的數目。
本實例代碼如下：
<html>
<body>
<%
dim d, a, s, i
set d=Server.CreateObject("Scripting.Dictionary")
d.Add "c", "China"
d.Add "i", "Italy"
Response.Write("key/item 對的數目是：" & d.Count)
set d=nothing
%>
</body>
</html>
本實例運行結果如下：
key/item 對的數目是：2
留言列表
