SoloCodigo

Hola. como están todos, quisieran que me ayudaran aun problemilla que tengo.

Soy programador de VB 6.0, y realize un programa que está conectado a Acces 2000, y me toco mudar el motor de base de datos a Mysql 5.0, pero ahora cuando realizo las consultas el método recordcount de Ado me devuelve el valor de -1 y no puedo saber si he encontrado un registro con una especificaciones hechas.

Deseo saber si hay otra forma de poder saber cuantos registros devuelve una consulta sql realizada en VB 6.0 y usando Ado.

de antemano les agradezco toda la ayuda que me puedan brindar, y si les puedo colaborar en algo cuenten con mi ayuda

Gracias
Oscar


El resultado que me envia el recorcount es -1 y no entra en la condición para realizar las acciones que necesito. por eso quiero saber el numero de registros devueltos en la consulta

Gracias por su ayuda

Elñ codigo que estoy usando es


Dim Cn As New Adodb.connection
Dim Rs as new adodb.recordset


Suponiendo que ya tengolista la conexion
 ahora hago la consulta


Rs.open = "Select * From Usuarios Where Nom_usu ='" &  xxxx &'"',cn,1,3
if Rs.recordcount > 0 then
   xxxxxx
   xxxx
   xxxx
   rs.close
   else
        rs.close
end if

El resultado que me envia el recorcount es -1 y no entra en la condición para realizar las acciones que necesito. por eso quiero saber el numero de registros devueltos en la consulta

Gracias por su ayuda

tu error es simple rs.open no lleva el =  

Gracias por tu respuesta, pero la verdad es que ya lo he intentado con el Do While y lo que me pasa es que quedo en un ciclo infinito y ya no se puede salir de él, pero lo voy a ver si lo hago como tu me dices, pero por favor si conoces otro método no dudes en enviarmelo, de verdad te lo agradezco

gracias

Oscar