resumiendo Can Anyone help me?
Publicado por Sergio (5 intervenciones) el 09/10/2009 21:36:00
Dim dbs As DAO.Database
Dim parteshoras As DAO.Recordset
Set dbs = CurrentDb
Set parteshoras = dbs.OpenRecordset("hor_detCons")
La consulta hor_detCons me abre perfecta en access, pero cuando intento ejecutarla en un modulo me da error 3061 pocos parametros en openrecordset.
Las lineas estan copiadas de la ayuda de access 2007
Pues quiero utilizar una consulta de seleccion predefinida en access, cuyos crierios de seleccion me entran en un formulario y que ejecutandola desde access me crea un subconjunto de registros perfecto, o sea funciona bien. Ahora bien ese subcojunto de registros necesito darle un tratamiento con Basic y no consigo abrir el Dataset pues me da el error en el open ejecutar el modulo, sin embargo si cambio el nombre de la consulta en el open por el de la tabla original no me da error.
Deduzco que no me deja utilizar consultas en basic por alguna razon.
La consulta es esta: pero funciona osea que ni tocarla
SELECT hor_det.CLAVE_DET, hor_det.TRABAJO, hor_det.DENOMINA, hor_det.HORAS, hor_det.M_D, hor_det.DIETAS, hor_det.IMP_DIETA, hor_det.KMS, hor_det.N, hor_det.C, hor_det.OCP, hor_det.CATEGO, hor_det.FECHA AS FECHA2, hor_det.FECHA, hor_det.OPERARIO, hor_det.EMPRE, hor_det.V1, hor_det.V2, hor_det.PHT, hor_det.FESTIVO, hor_det.ALIAS, hor_det.ESPECIAL, hor_det.TEXTO, hor_det.TIPO_HORA, hor_det.MANUAL, hor_det.FECHAPRO
FROM hor_det
WHERE (((hor_det.FECHA)>=[Formularios]![Seleccion Partes]![FEDESDE] And (hor_det.FECHA)<=[Formularios]![Seleccion Partes]![FEHASTA]) AND ((hor_det.OPERARIO)=[Formularios]![Seleccion Partes]![EMPLE1]) AND ((hor_det.EMPRE)=[Formularios]![Seleccion Partes]![empre1]))
ORDER BY hor_det.CLAVE_DET;
Active el ado 3.6 y me dice que el nombre entra en conflicto con un modulo, proyecto o biblioteca existente. Pues habia leido en el foro que alguien tenia mismo problema para usar querys y se le habia reparado activando Dao.
si la referencia es Dao, yo lo que quiero simplemente es poder usar en Vba la consulta que tengo predefinida en access y que funciona bien. Como traduccion ya lo hace el propio access no??
voy a probar a deshabilitar 12.0 y habilitar Dao 3.6
Como colines se puede usar una consulta ya definida en Access esa es mi question
Dim parteshoras As DAO.Recordset
Set dbs = CurrentDb
Set parteshoras = dbs.OpenRecordset("hor_detCons")
La consulta hor_detCons me abre perfecta en access, pero cuando intento ejecutarla en un modulo me da error 3061 pocos parametros en openrecordset.
Las lineas estan copiadas de la ayuda de access 2007
Pues quiero utilizar una consulta de seleccion predefinida en access, cuyos crierios de seleccion me entran en un formulario y que ejecutandola desde access me crea un subconjunto de registros perfecto, o sea funciona bien. Ahora bien ese subcojunto de registros necesito darle un tratamiento con Basic y no consigo abrir el Dataset pues me da el error en el open ejecutar el modulo, sin embargo si cambio el nombre de la consulta en el open por el de la tabla original no me da error.
Deduzco que no me deja utilizar consultas en basic por alguna razon.
La consulta es esta: pero funciona osea que ni tocarla
SELECT hor_det.CLAVE_DET, hor_det.TRABAJO, hor_det.DENOMINA, hor_det.HORAS, hor_det.M_D, hor_det.DIETAS, hor_det.IMP_DIETA, hor_det.KMS, hor_det.N, hor_det.C, hor_det.OCP, hor_det.CATEGO, hor_det.FECHA AS FECHA2, hor_det.FECHA, hor_det.OPERARIO, hor_det.EMPRE, hor_det.V1, hor_det.V2, hor_det.PHT, hor_det.FESTIVO, hor_det.ALIAS, hor_det.ESPECIAL, hor_det.TEXTO, hor_det.TIPO_HORA, hor_det.MANUAL, hor_det.FECHAPRO
FROM hor_det
WHERE (((hor_det.FECHA)>=[Formularios]![Seleccion Partes]![FEDESDE] And (hor_det.FECHA)<=[Formularios]![Seleccion Partes]![FEHASTA]) AND ((hor_det.OPERARIO)=[Formularios]![Seleccion Partes]![EMPLE1]) AND ((hor_det.EMPRE)=[Formularios]![Seleccion Partes]![empre1]))
ORDER BY hor_det.CLAVE_DET;
Active el ado 3.6 y me dice que el nombre entra en conflicto con un modulo, proyecto o biblioteca existente. Pues habia leido en el foro que alguien tenia mismo problema para usar querys y se le habia reparado activando Dao.
si la referencia es Dao, yo lo que quiero simplemente es poder usar en Vba la consulta que tengo predefinida en access y que funciona bien. Como traduccion ya lo hace el propio access no??
voy a probar a deshabilitar 12.0 y habilitar Dao 3.6
Como colines se puede usar una consulta ya definida en Access esa es mi question
Valora esta pregunta
0