案例:ASP/ADO案例     状态:不可编辑再运行    进入竖版
 运行结果 
x
 
1
2
<html>
3
<body>
4
5
<%
6
dim d, a, s, i
7
set d=Server.CreateObject("Scripting.Dictionary")
8
d.Add "c", "China"
9
d.Add "i", "Italy"
10
Response.Write("key/item 对的数目是:" & d.Count)
11
set d=nothing
12
%>
13
14
</body>
15
</html>
16