Visual Basic - Imprimir informes Access

Life is soft - evento anual de software empresarial
 
Vista:

Imprimir informes Access

Publicado por maria (24 intervenciones) el 11/06/2006 19:08:27
Tengo un formulario con 2 campos de texto para fechas y un boton imprimir. He creado una serie de informes en una base de datos Access los cuales quiero visualizar desde mi aplicacion VB una vez pulse dicho boton.
Quiero visualizar solo aquellos datos del informe que esten dentro del rango de fechas que establezco en esos 2 campos.Para ello escribo el siguiente codigo en un modulo .bas, pero se imprimen todos los datos del informe sin tener en cuenta las fechas que le indico. Creo que el fallo podria estar en el filtro creado. Son correctas las sentencias empleadas? Ademas, tras establecer estas sentencias se me bloquea la BD en modo exclusivo. Por que?

Gracias por su ayuda.

Public Sub Imprimir(print As Integer)
Dim Msa As Access.Application
Set Msa = New Access.Application

Msa.OpenCurrentDatabase "bd.mdb", False

Msa.DoCmd.OpenReport "Informe1", acViewPreview 'acViewDesign
Msa.DoCmd.Maximize
Msa.Visible = False
filtro = filtro & "Entre #" & fechaD & "#"
filtro = filtro & "y #" & fechaH & "#"
Msa.DoCmd.OpenReport "Informe1", acNormal, filtro
Msa.DoCmd.Close acDefault, , acSaveYes
Set Msa = Nothing
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:Imprimir informes Access

Publicado por El pedos (4 intervenciones) el 11/06/2006 23:13:28
me parece que eso no entra aquí, no sé si habrá algun foro de VBA pero desde luego este no es.
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