SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Oscar_21224 en Viernes 27 de Julio de 2007, 20:31
-
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
-
¿puedes mostrar tú código?
Saludos
-
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
-
Por favor necesito de su ayuda, como puedo contar los registros devueltos de una consulta sql, estoy usando vb 6.0 ado y el motor de base de datos es MySql. estuve revisando en las ayudas de vb y me dice que el método recordcount no funciona con mysql, por eso el resultado de este método cuando realizo la consulta es -1. De verdad quien pueda ayudarme lo necesito
-
tu error es simple rs.open no lleva el = :scream: :kicking:
-
Hola, si lo que quieres es realizar acciones siempre que exista un registro, usa lo siguiente:
...
While not rs.eof
'acciones...
wend
...
Para saber el recordcount, prueba a moverte al últimoregistro y luego al primerregistro.
...
rs.movelast
rs.movefirst
msgobx rs.recordcount
...
Y cómo te han comentado, el rs.open no lleva igual, ó te dará error.
Saludos.
-
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
-
Se me olvidado ponerte, para que no te entre en unciclo infinito como dices, dentro del while... wend un rs.movenext.
Saludos.