Hola Adler, primero que nada grax por responder.

Ya probé cambiando la linea de codigo con el ejemplo que me pusiste:
if (CInt(j) = ubound(total_registros,2)) or ( rs_muestra("dep_id") = rs_selecciona("dep_id")) then%>
Pero desafortunadamente sigue enviando el mismo error, alguna otra idea??? Gracias