Question

我基本上是从另一个我看到它的论坛（没有人回答）粘贴这个。它本质上是我想要做的完全相同的事情：

在ASP classic中，有没有办法计算字符串出现在字符串数组中的次数，并根据字符串和出现次数输出它们？

例如，如果我有一个包含以下内容的数组：
你好
快乐
你好
你好
测试
你好
测试
快乐

输出结果为：

你好4
快乐2
测试1
测试1

谢谢！

Answer 1

我假设语言是VBScript（因为大多数人都使用经典ASP）。

您可以使用Dictionary对象来跟踪各个计数：

Function CountValues(pArray)
    Dim i, item
    Dim dictCounts
    Set dictCounts = Server.CreateObject("Scripting.Dictionary")

    For i = LBound(pArray) To UBound(pArray)
        item = pArray(i)
        If Not dictCounts.Exists(item) Then
            dictCounts.Add item, 0
        End If
        dictCounts.Item(item) = dictCounts.Item(item) + 1
    Next

    Set CountValues = dictCounts
End Function

计算数组中字符串的出现次数

1 个答案: