Set ObjDic = Server.CreateObject("Scripting.Dictionary") ObjDic.Add 1, "Hola" ObjDic.Add 2, "Neox" ObjDic.Add 3, "Bienvenido" Set ObjDic = Nothing
Response.Write(ObjDic.Item(1))