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