案例：ASP/ADO案例     状态：不可编辑再运行    进入竖版
 运行结果　
​x
 
1
​
2
<html>
3
<body>
4
​
5
<%
6
dim d
7
set d=Server.CreateObject("Scripting.Dictionary")
8
d.Add "c", "China"
9
d.Add "i", "Italy"
10
if d.Exists("c")= true then
11
    Response.Write("键存在。")
12
else
13
    Response.Write("键不存在。")
14
end if
15
set d=nothing
16
%>
17
​
18
</body>
19
</html>
20
​