Programación General > Visual Basic 6.0 e inferiores
Re: Informe de Access con Visual?
ebolo:
EDITO: ya veo que se adelantado Brroz, que sabe mucho más que yo.
Hola de nuevo.
Yo lo uso tanto con wXP como con w2000 y access97 y me funciona sin problemas; NO necesito tener abierto el access para que me muestre el informe.
Eso me ocurría al principio y por eso le añadí:
----------------
Set ObjAccess = CreateObject("access.application.8")
'Si la base de datos fuera de access 2000 tendríamos que poner un 9, en vez de 8( que es para access 97).
'Abrimos la B.D. que nos interesa
ObjAccess.OpenCurrentDatabase "BaseDeDatos.mdb"
----------------
Has probado a ponerle el 9 en vez de 10.
En cuanto a la Referencia del proyecto, yo creo que no depende del s.o. y SÍ del access que vayas a usar; pero en ésto no estoy seguro.
En cuanto a la consulta debes pasarle, si la fecha de nacimiento es campo Fecha, pues así:" [Fecha Nacimiento]=#" & format(TuvariableFechanacimiento,"dd/mm/yyyy") & "#" .
Le sobra el "Select .........". Es decir al filtro se le pasa sólo el campo de la consulta por el que se quiere discriminar y su valor.
Lo que puedes hacer para ver el filtro como te debe pasar al informe, es hacerte la consulta en access, ponerle en el diseño, el valor del criterio del campo con el que quieres discriminar la consulta, grabarla y lanzar el informe.
Luego en el informe vas a propiedades y miras como está el filtro; y según esté es como se lo debes pasar.
Saludos y suerte.
PD: yo no soy ningún experto, Si alguien del foro puede aclarar las dudas que han surgido creo que todos les estaremos agradecidos.
ebolo:
Hola de nuevo.
Te dejo adjunto un ejemplo para que te funcione con wXP y access2000.
Mirar el leeme.txt antes.
Me ha funcionado sin problemas; usa un método papa ver visualización por pantalla y otro para imprimir el informe.
Es la única forma que le he hecho funcionar bien.
Saludos.
EL Loco:
:ph34r: Holas gente!!
Comento 1 par de cosas la sentencia select que puse es a modo de EJEMPLO
lo que si tuve que hazer Brroz es cambiar la sentencia que usaba para el datagrid que es T-SQL y usar el sql de access
Voy a revisar de nuevo el codigo que paso Ebolo a ver que encuentro
Ebolo si pongo el Object Library 9 no me funciona porque yo tengo el 10
no tengo idea porque pero en fin , creo que nada tiene que ver con que sea accsess 97 o 2000 sino con que libreria tengas instalada.
Brroz lo de crear la consulta ya lo habia hecho y apartir de ahi cree el informe de accsess , y sin las lineas de ebolo no me funciona!
Una ultima cosa de momento solucione uno de los problemas que tenia de
la siguiente manera
1) creo un comando en el data environment , Dynamico y que devuelva un RS
2) Creo 1 datareport y lo vinculo al Comando
3) Como no se porque motivo no me lo filtra opte por cerrarlo
y abrirlo con cada sentencia select que necesito cuando le doy al boton Imprimir
:devil:
Igualmente me sigue interesando el tema de Access
Gracias a Todos!!
Navegación
[*] Página Anterior
Ir a la versión completa