Domingo 22 de Diciembre de 2024, 09:02
SoloCodigo
Bienvenido(a),
Visitante
. Por favor,
ingresa
o
regístrate
.
¿Perdiste tu
email de activación?
Inicio
Foros
Chat
Ayuda
Buscar
Ingresar
Registrarse
SoloCodigo
»
Foros
»
Programación General
»
Visual Basic 6.0 e inferiores
(Moderador:
F_Tanori
) »
Cantidad De Registros En Una Consulta
« anterior
próximo »
Imprimir
Páginas: [
1
]
Autor
Tema: Cantidad De Registros En Una Consulta (Leído 4631 veces)
solcito
Miembro MUY activo
Mensajes: 143
Cantidad De Registros En Una Consulta
«
en:
Jueves 10 de Marzo de 2005, 22:43 »
0
Hola todos. Estoy haciendo una consulta a una base de datos, en mi programa necesito saber la cantidad de registros que me devuelve de esa consulta.
lo que hago es lo siguiente:
recordset.RecordCount
y me devuelve -1 !!
estoy segura que esa consulta devuelve algo porq me lo muestra en una grilla, lo que no me funciona es el recordConunt
Desde ya muchas Gracias!
Pd: es urgente
esto me esta trabando todo
Tweet
Everything that has a beginning has an end.....
ArKaNtOs
Miembro de PLATA
Mensajes: 1253
Nacionalidad:
Re: Cantidad De Registros En Una Consulta
«
Respuesta #1 en:
Viernes 11 de Marzo de 2005, 14:49 »
0
porque no te mueves al ultimo registro y de ahi tomas el recordcount, eso hago yo y me funciona a la perfeccion
solocodigo
el punto de encuentro de los programadores
VB
,
C
,
C++
,
.Net
,
Java
,
Delphi
,
Linux
,
Programacion de Videojuegos
,
ASM
,
Dudas Informaticas
.
solcito
Miembro MUY activo
Mensajes: 143
Re: Cantidad De Registros En Una Consulta
«
Respuesta #2 en:
Viernes 11 de Marzo de 2005, 19:22 »
0
No se porq no me funciona!!
probé con el de ir hasta el ùltimo registro y tampoco, cuando hago
recordset.MoveLast me devuelve el siguiente error:
"No se puede reiniciar la posicion del conjunto de filas"
No se porq es esto y necesito solucionarlo urgente, si alguien tiene idea o ya le pasó alguna vez.....
Saludos
Everything that has a beginning has an end.....
ebolo
Miembro MUY activo
Mensajes: 188
Re: Cantidad De Registros En Una Consulta
«
Respuesta #3 en:
Viernes 11 de Marzo de 2005, 19:52 »
0
Hola solcito, has comprobado que la consulta realmente te da algún registro?. Supongo que sí. Si no lo has hecho compruébalo.
Yo lo que hago es poner la consulta SQL en una variable(xej.: cons) y luego la meto en el clipboard:
Clipboard.Clear
Clipboard.SetText cons
Luego abro la bd con el access, creo una consulta sin nada y pego en la vista SQL el contenido de la Clipboard mediante Ctrl+V.
Y veo que ocurre.
Es que ese error creo recordar me salió una vez y era por que no la consulta no daba ningún registro.
Saluods y suerte.
solcito
Miembro MUY activo
Mensajes: 143
Re: Cantidad De Registros En Una Consulta
«
Respuesta #4 en:
Viernes 11 de Marzo de 2005, 20:29 »
0
Prbar que la consulta me trajera algo, es lo primero que hice, y si me trae algo, el problema está en como yo hago la consulta:
Código: Text
Public Function BuscarCredObs(ByVal credencial As String) As ADODB.Recordset
Dim cm As ADODB.Command
On Error GoTo ErrorBuscarCredObs
Set BuscarCredObs = New ADODB.Recordset
Set cm = New ADODB.Command
With BuscarCredObs
.CursorType = adOpenStatic
.CursorLocation = adUseClient
.LockType = adLockOptimistic
End With
With cm
.ActiveConnection = CadenaConecc
.CommandType = adCmdStoredProc
.CommandText = "SH_BuscarCredObs_sel"
.Parameters.Append .CreateParameter("@Credencial", adChar, adParamInput, 8, Mid(Trim(credencial), 1, 8))
.Parameters.Append .CreateParameter("@Fecha", adDate, adParamInput, 8, Date)
.Parameters.Append .CreateParameter("@registros", adInteger, adParamOutput, , lngRegistros)
Set BuscarCredObs = .Execute
End With
ErrorBuscarCredObs:
....
....
End Function
La hago de esta manera para poder hacerlo en un procedimiento almacenado.
Haciendolo de esta manera:
Código: Text
Public Function BuscarCredObs(ByVal credencial As String) As ADODB.Recordset
On Error GoTo ErrorBuscarCredObs
Set BuscarCredObs = New ADODB.Recordset
With BuscarCredObs
.ActiveConnection = CadenaConecc
.CursorType = adOpenStatic
.CursorLocation = adUseClient
.LockType = adLockOptimistic
.Source = "<consulta>"
.Open
End With
ErrorBuscarCredObs:
..
...
End Function
si funciona, pero me parece mas prolijo y eficiente tener la consulta en un procedimiento, pero no funka
, no se porq ??
Everything that has a beginning has an end.....
Brroz
Miembro de PLATA
Mensajes: 1058
Re: Cantidad De Registros En Una Consulta
«
Respuesta #5 en:
Sábado 12 de Marzo de 2005, 08:05 »
0
Hola solcito.
Citar
CursorLocation = adUseClient
Tener el cursor sql 'del lado del cliente' es lo que hace funcionar la prodiedad recordcount (Esto teniendo en cuenta que hay proveedores de datos que no soportan esta propiedad).
Si usas una llamada a un procedimiento almacenado mediante el método execute del recordset, mucho me temo que no te va funcionar la propiedad recordcount... pero siempre hay solución: usa una sentencia SQL del tipo "SELECT COUNT(*) FROM Tabla" para obtener la cuenta de registros de tu selección.
Chao.
Imprimir
Páginas: [
1
]
« anterior
próximo »
SoloCodigo
»
Foros
»
Programación General
»
Visual Basic 6.0 e inferiores
(Moderador:
F_Tanori
) »
Cantidad De Registros En Una Consulta