Visual Basic - Recorset con Where ERROR ???

Life is soft - evento anual de software empresarial
 
Vista:

Recorset con Where ERROR ???

Publicado por groval (225 intervenciones) el 26/06/2003 00:54:45
Hola .. Gracias por detalle de ayudar... Tengo el siguiente codigo pero apenas le agrego la clausila WHERE no me funciona .. que sera
'===========================
Private Sub ResultadosEstadisticos() ' ESTO ES PARA ARMAR EL RECORSET DE LA INFORMACION ESTADISTICA
Call Open_Database
Set rstResEstadistica = New ADODB.Recordset
Set rstResEstadistica.ActiveConnection = cnn
rstResEstadistica.Open "SELECT *" _
& " FROM tabla_Estadistica" _
& " WHERE Tabla_Estadistica.FECHA= '" & Text1.Text & "'" _
& " Tabla_Estadistica.UNIDAD ='" & Combo1.Text & "'" _
& " AND Tabla_Estadistica.BLANCO ='" & Combo8.Text & "'" _
& " AND Tabla_Estadistica.MUNICIPIO ='" & Combo4.Text & "'"

' MUESTRA LOS DATOS ESTADISTICOS ACUERDO LA CONSULTA
Combo13 = IIf(IsNull(rstResEstadistica("CATEGORIA")), "**Ninguno**", Trim(rstResEstadistica("CATEGORIA")))
Combo14 = IIf(IsNull(rstResEstadistica("RESULTADO")), "**Ninguno**", Trim(rstResEstadistica("RESULTADO")))
Text6 = IIf(IsNull(rstResEstadistica("CANTIDAD")), "**Ninguno**", Trim(rstResEstadistica("CANTIDAD")))

Call Close_Database
End Sub
'=============================

Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Recorset con Where ERROR ???

Publicado por jose carlos (243 intervenciones) el 26/06/2003 01:03:45
creo que el problema está en la FECHA en un foro leí, pero no me acuerdo, que la fecha debe ir encerrada entre # , pero como te digo, no recuerdo excatamente.

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Si ese era el problema.. ! pero tengo otro ahora

Publicado por GROVAL (225 intervenciones) el 26/06/2003 01:49:17
Gracias Jose Carlos por recordarme ese pequeño detalle... imaginses y me tenia jodido.. !! Bueno pero ahora tengo otro problema.. como el recorset no encontro tal vez un registro me saca un error " El valor del BOF o el de EOF es true, o el actual registro se elimino, la operacion solicitada requiere un registro actual" pero como soy novato en esto no tengo idea de como remediarlo porque no estoy manejando el control ADO sino recorset. Si esta en tus manos echarme otra mano sino te agradezco haberme ayudado ahora.. !!
Muchas gracias.. !!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Si ese era el problema.. ! pero tengo otro ahor

Publicado por kikecg (352 intervenciones) el 26/06/2003 16:14:07
Hola.
Esto es una precaución que hay que tomar siempre:
If Recordset.EOF And Recordset.BOF THEN
'No hay registros, avisalo por un mensaje o actua en consecuencia
Else
'Si hay registros. así que puedes operar con ellos.
End If

Pruebalo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar