Yo pensaba en algo como:
Cita:
arrCodigosQueRecibes = "Todos los codigos que recibiste para buscar en la base de datos"
rs = "Consulta a la base de datos para todos los codigos"
largo = Ubound(arrCodigosQueRecibes)
redim arrCodigosQueRecibesResultados(largo)
while not rs.eof
varCodigoEncontrado = cstr(rs("codigo"))
for i=0 to largo
if arrCodigosQueRecibes(i) = varCodigoEncontrado then
arrCodigosQueRecibesResultados(i) = True
exit for
end if
next
rs.next
loop
'Luego haces un for sobre arrCodigosQueRecibesResultados y si su valor es True entonces lo encontraste, y sino, pues quiere decir que no lo encontraste.
for i=0 to largo
if arrCodigosQueRecibesResultados(i) = True then
Response.write arrCodigosQueRecibes & " Encontrado<br>"
else
Response.write arrCodigosQueRecibes & " No - Encontrado<br>"
end if
next
Wowww, puse casi todo el codigo, jajaja, a lo mejor para nada, a lo mejor no es lo que necesitas, pero esa es la idea. Es decir, tienes todos los codigos que estabas buscando en un arreglo, y buscas uno por uno...
Este algoritmo no esta bien depurado ni pensado, pero tiene la idea principal, espero que te sirva.
Suerte!!