mansobravo80
26 de Junio del 2004

con esto me lo imprime directamente:

Set Informe = New Access.Application
Informe.OpenCurrentDatabase (App.Path & "Almacens.mdb")
Informe.DoCmd.OpenReport "ImprimirInformes", acViewNormal
Informe.CloseCurrentDatabase
Set Informe = Nothing

lo q quiero es ver antes el informe por pantalla
Muchas Gracias por perder el tiempo conmigo :D

rawfx
26 de Junio del 2004

Set Informe = New Access.Application
Informe.OpenCurrentDatabase (App.Path & "\Almacens.mdb")
Informe.DoCmd.OpenReport "ImprimirInformes", acViewNormal
Informe.CloseCurrentDatabase
Set Informe = Nothing

****** Solo cambia acViewNormal por acViewPreview