ASP Count 属性

 DictionaryObject.Count 

 <%
 dim d
 set d=Server.CreateObject("Scripting.Dictionary")
 d.Add "n","Norway"
 d.Add "i","Italy"
 d.Add "s","Sweden"
 Response.Write("The number of key/item pairs: " & d.Count)
 set d=nothing
 %>

 输出：

 The number of key/item pairs: 3