如何根据给定的项值显示Motobit Multi.Dictionary中的键?

如何根据给定的项值显示Motobit Multi.Dictionary中的键?,dictionary,vbscript,asp-classic,Dictionary,Vbscript,Asp Classic,我是编程新手,如果我的问题看起来很愚蠢,我很抱歉。我想问,当我有值时,是否有任何方法可以从中返回键 这是我的代码: Dim myDict Set myDict= Server.CreateObject("Multi.Dictionary") myDict.UniqueKeys = False 'Fill dictionary with some data myDict("param1") = "value1" myDict.Add "param2", "value2" myDict.Add

我是编程新手,如果我的问题看起来很愚蠢,我很抱歉。我想问,当我有值时,是否有任何方法可以从中返回键

这是我的代码:

Dim myDict
Set myDict= Server.CreateObject("Multi.Dictionary")
myDict.UniqueKeys = False 

'Fill dictionary with some data
myDict("param1") = "value1"
myDict.Add "param2", "value2"
myDict.Add "param2", "value2.2"

'Get dictionary Keys
Keys = myDict.Keys
Items = myDict.Items

For Z = 0 To UBound(Items)
  Response.Write(Keys(Z) & " " & Items(Z) & "<br>")
Next
Dim myDict
设置myDict=Server.CreateObject(“Multi.Dictionary”)
myDict.UniqueKeys=False
'用一些数据填充字典
myDict(“参数1”)=“值1”
myDict.添加“参数2”、“值2”
myDict.添加“参数2”、“值2.2”
“去拿字典钥匙
Keys=myDict.Keys
Items=myDict.Items
对于Z=0到UBound(项目)
响应。写入(键(Z)和“&项(Z)和”
”) 下一个
现在又回来了

下标超出范围:“2”

这是正常的,因为我循环了3次,而我只有2个键

那么有没有可能得到这样的结果:

Param1: "value1" Param2: "value2" Param2: "value2.2" 参数1:“值1” 参数2:“值2” 参数2:“值2.2” 您可以通过检查多个或不多个项目来循环查看
myDict
的键

Dim myDict
设置myDict=Server.CreateObject(“Multi.Dictionary”)
myDict.UniqueKeys=False
myDict(“参数1”)=“值1”
myDict.添加“参数2”、“值2”
myDict.添加“参数2”、“值2.2”
暗键,子项
对于myDict.Keys中的每个键
如果是IsArray(myDict(key)),则“项”是一个数组
对于myDict中的每个子项(键)
响应。写入键&“:”&子项&“
” 下一个 其他的 响应。写入键&“:”&myDict(键)&“
” 如果结束 下一个
填充值后调用
myItem=myDict.Item(“param2”)
会得到什么?结果是一个项目数组吗
typename(myItem)
显示返回值的类型。