Access - Algo sencillo (Querydef)

 
Vista:

Algo sencillo (Querydef)

Publicado por Miguel Angel (30 intervenciones) el 09/11/2000 00:00:00
Quiero trabajar con Querydef para obtener un recordset a través de una consulta de access, tecleo el siguiente código pero me da un error ("no coinciden los tipos") ¿Por qué puede ser?¿Necesito instalar alguna librería aparte de microsoft DAO 3.6?

Private Sub Nivel_LostFocus()
Dim rstNomina As Recordset
Dim qdfNomina As QueryDef
Set qdfNomina = Nothing
Set qrdNomina = DBEngine.Workspaces(0).Databases(0).QueryDefs("calcula_nomina")
qrdNomina.Parameters("[ctrl]").Value = Forms!f_plantilla.Control
Set rstNomina = Nothing
Set rstNomina = qrdNomina.OpenRecordset(dbOpenDynaset)

End Sub

Si alguien puede ayudarme se lo agradecería enormemente.
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:Algo sencillo (Querydef)

Publicado por isidroalmaguer (31 intervenciones) el 09/11/2000 00:00:00
hola...
no necsitas declarar el ojbeto workspcae, eso se hace una sola vez..

lo unico que debes hacer es hacer referencia al objeto querydef de la siguiente manera, asi es como lo hago yo

set qdf= db.QueryDefs("NombreConsulta")
qdf!parametro1= Valor1
qdf!parametro2= Valor2
...
y asi para los parametros que manejes en la
consulta..

y luego haces referencia al recordset como sigue...

set rst=db.OpenRecordset(tipo de rst devuelto)

donde
qdf es un objeto QueryDef
rst es un objeto recordset
db es un objeto database

asi lo uso en vb5 con Access97

espero te ayude..
saludos
isidroalmaguer
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:Algo sencillo (Querydef)

Publicado por tecnicam (117 intervenciones) el 09/11/2000 00:00:00
Tampoco te vendría mal un repaso a la implementación de bases de datos.
Esto lo tienes en el curso que está en marcha en visualia (la dirección está abajo)
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:Algo sencillo (Querydef)

Publicado por miguel angel (30 intervenciones) el 10/11/2000 00:00:00
ok, Gracias el código funciona solo que no tenía instalado las librerías correctas, he pasado de access 97 a 2000 y estaba un poco liado. 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