Question

我是编程新手，所以如果我的问题显得愚蠢，我很抱歉。我想问一下当我有值时，是否有办法从Multi.Dictionary返回密钥？

这是我的代码：

0 + 1*256 = 256, 0 + 10*256 = 2560

现在返回

下标超出范围：＆＃39; 2＆＃39;

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

所以可以得到这样的结果：

Param1: "value1"
Param2: "value2" 
Param2: "value2.2"

Answer 1

您可以通过检查项目是否多次来遍历myDict的键。

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

myDict("param1") = "value1"
myDict.Add "param2", "value2"
myDict.Add "param2", "value2.2"

Dim key, subItem
For Each key In myDict.Keys
    If IsArray(myDict(key)) Then ' item is an array
        For Each subItem In myDict(key)
            Response.Write key & ": " & subItem & "<br>"
        Next
    Else
        Response.Write key & ": " & myDict(key) & "<br>"
    End If
Next

如何通过给定的项目值显示Motobit Multi.Dictionary中的键？

1 个答案: