Option button

[PMP]

Necesitaría saber un poco mas como es lo que quieres hacer, pero acá te mando un ejemplo de como se usa el objeto diccionario, lo puedes conseguir en cualquier web sobre ASP.
Es muy sencillo y muy útil.

<%
set objConn = Server.CreateObject("ADODB.Connection")
objConn.open "DSN=wapbolsa"
strSQL = "SELECT * FROM valor"
set objRS = objConn.Execute(strSQL)

' crear el objeto diccionario y añadir los valores de la BD
set objDict = createObject("Scripting.Dictionary")
do while not objRS.eof
strclave = objRS("idValor")
strvalor = objRS("Importe")
objDict.Add strclave, strvalor
objRS.movenext
loop
objRS.Close
set objRS = nothing
objConn.Close
set objConn = nothing

' operaciones sobre el objeto diccionario
strClavesArray = objDict.Keys
strValoresArray = objDict.Items
for i = 0 to objDict.Count -1
response.write(strClavesArray(i) & ": " & strValoresArray(i) & "<br>")
next

if objDict.Exists("TELE") then
response.write ("Existe Tele con el valor: " & objDict.Item("TELE"))
else
response.write ("No existe Tele")
end if
%>


Espero te sirva y lo adaptes a tus necesidades.

Saludos