asp-classic - 如何在经典 ASP 中遍历集合？

Question

我希望能够做到:

For Each thing In things
End For

经典 ASP - 不是 .NET!

Answer 1

像这样的东西？

dim cars(2),x
cars(0)="Volvo"
cars(1)="Saab"
cars(2)="BMW"

For Each x in cars
  response.write(x & "<br />")
Next

见 www.w3schools.com .
如果要关联键和值 use a dictionary object反而:

Dim objDictionary
Set objDictionary = CreateObject("Scripting.Dictionary")
objDictionary.Add "Name", "Scott"
objDictionary.Add "Age", "20"
if objDictionary.Exists("Name") then
    ' Do something
else
    ' Do something else 
end if