
<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>