<html> <body> <% dim d, a, s, i set d=Server.CreateObject("Scripting.Dictionary") d.Add "n", "Norway" d.Add "i", "Italy" Response.Write("The number of key/item pairs is: " & d.Count) set d=nothing %> </body> </html>
<% dim d, a, s, i set d=Server.CreateObject("Scripting.Dictionary") d.Add "n", "Norway" d.Add "i", "Italy" Response.Write("The number of key/item pairs is: " & d.Count) set d=nothing %>