Scripting.Dictionary对象是ASP脚本运行时库附带的ActiveX对象，是集合的一种类似has表，用于保存数据键和项目的键值对。

Dictionary对象使用实例

<%

Dim dic  

Set dic = CreateObject("Scripting.Dictionary") '创建键值对对象

dic.Add "1","A"   '添加键值和键值内容.

dic.Add "2","B"

dic.Add "3", "C" 

'循环显示键值对内容

    If IsNull(dic) = False Then

        For Each objDic In dic

            Response.Write(objDic & " = ")

            Response.Write(dic.Item(objDic) & "<br>")

        Next

    End If

%>