Visual Basic - Comprobaciones con muuuuchos registros

Wenaaaaaasss

tengo dos recordsets, uno para cada ODBC. Con cada uno hago una consulta select sql para objener los registros de las bases de datos correspondientes.

El caso es que tengo que comparar todos los elementos de uno con todos los elementos de otro y pasa que uno tiene 18000 registros y el otro 4500 (mas o menos) con lo que tiene que hacer 81 millones!!!! de comprobaciones y claro, el programa se queda colgado y no responde, hay que finalizar aplicacion.

Lo he hecho de la siguiente forma:

Do While Not reg_art_dat.EOF

Do While Not reg_catalogo.EOF

If reg_art_dat.fields("f_art_cod") = reg_catalogo.fields("REF") Then
escribir = 1
End If

reg_catalogo.MoveNext

Loop

reg_art_dat.MoveNext
Loop

Al poco de ejecutar el programa se queda como que no responde pero he pensado que tiene que tardar bastante.

Mi pregunta es ¿puede quedarse el visual basic 6.0 colgado al tener que manejar tanta informacion (81 millones de comprobaciones, 18000 registros de un lado con 4500 registros de otro) o esta preparado para soportarlo?

Muchas gracias!!!

saludos.

Hola,
Sí que soporta mucha información, yo he trabajado con muchísimos más registros (100.000 o más) y también veo que si le doy a Ctrl-Alt-Supr me pone "no responde", pero continúa trabajando.
Visualiza el Monitor del sistema de Windows, ya verás cómo sigue trabajando...

Y si después de un buen rato no responde, prueba otro método, como... hacer una subrutina que llame para comparar cada archivo de la otra base de datos.
En el principal, una base de datos, antes de hacer Movenext, llama a la subrutina y compara con los registros de la otra BD.

Si te sirve de ayuda....

Aunque también me gustaría a mí a veces hacer otra cosa para que vaya más rápido, si a alguien se le ocurre.... que nos lo cuente.

Un saludo.