vbscript - 在经典ASP中对数组进行分组？

我在ASP中有一个看起来像这样的数组：

3,5,7,7,3,2,3

我想要做的是将它们与一个计数分组在一起，这样我就可以了：

Number  Count
2       1
3       3
5       1
7       2

这可能吗？如果可以，怎么办？

最佳答案

在asp-classic中，没有关联数组..

替代方法是Scripting.Dictionary

所以

<%
    dim ar
    ar = array(3,5,7,7,3,2,3)

    dim dictArray

    set dictArray = server.CreateObject("Scripting.Dictionary")

    for each i in ar
        if dictArray.exists( i ) then
            dictArray(i) = dictArray(i) + 1
        else
            dictArray(i) = 1
        end if
    next
%>

这创建了您想要的东西...现在可以看到它

<%
    for each i in dictArray
        response.write( i & " : " & dictArray(i) & "<br />")
    next
 %>