Imprimir Report en PDF |
Responder |
Autor | |
anjemalo
Habitual Unido: 31/Mayo/2019 Localización: España Estado: Sin conexión Puntos: 51 |
Tema: Imprimir Report en PDF Enviado: 01/Noviembre/2019 a las 09:36 |
Hola: tengo dos ordenadores con las siguientes caracteristicas: - Windows 7, Office 2013, Adobe Reader DC, PdfCreator - Windows XP, Office 2007, Adobe Reader X, PdfCreator El problema es que no genera PFDs el ordenador con Windows XP, y el Pc con Windows 7 lo hace perfectamente. La carpeta que utilizo para imprimir los PDF tiene todos los privilegios de administrador, no está en red. Estas son las instrucciones que utilizo: BASE="CMB2C.mdb" acFormatPDF = "PDF Format (*.pdf)" set objAccess = vb1.CreateObject("Access.Application") objAccess.OpenCurrentDatabase BASE DoCmd.OpenReport "R_InformeDiario", acPreview DoCmd.OutputTo acOutputReport, "R_InformeDiario", acFormatPDF, CurrentProject.Path & & "\fichero.pdf", True Me podeis decir que hago mal? Gracias |
|
anjemalo
Habitual Unido: 31/Mayo/2019 Localización: España Estado: Sin conexión Puntos: 51 |
Enviado: 01/Noviembre/2019 a las 09:47 |
Estoy viendo errores en el codigo que os envio, es este: BASE="CMB2C.mdb" acFormatPDF = "PDF Format (*.pdf)" set objAccess = CreateObject("Access.Application") objAccess.OpenCurrentDatabase BASE DoCmd.OpenReport "R_InformeDiario", acPreview DoCmd.OutputTo acOutputReport, "R_InformeDiario", acFormatPDF, CurrentProject.Path & "\fichero.pdf", True |
|
raipon
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Moderador Unido: 10/Diciembre/2004 Localización: Desconocida Estado: Sin conexión Puntos: 4044 |
Enviado: 01/Noviembre/2019 a las 09:50 |
No se cual puede ser el problema, pero puedes probar:
- Poner un punto de interrupción y analizar linea a linea - objAccess.Visible = True para mostrar la interfaz de usuario - En el equipo XP, lanza las dos últimas lineas de tu código directamente en la base de datos, así podrás ver si hay algún aviso, mensaje de error, resultado, ... Saludos.
|
|
Mihura
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Administrador Unido: 06/Mayo/2005 Localización: En la dehesa Estado: Sin conexión Puntos: 13990 |
Enviado: 01/Noviembre/2019 a las 10:15 |
Access para generar PDF con acFormatPDF no necesita ninguna 'impresora PDF' instalada, lo hace solo, eso sí, las versiones que lo tienen.
Access 2007 (si no recuerdo mal) para poder imprimir PDF tiene que tener instalado un servipack, no me acuerdo si el 1 o el 2. |
|
xavi
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Administrador Terrassa-BCN Unido: 10/Mayo/2005 Localización: Catalunya |||| Estado: Sin conexión Puntos: 14720 |
Enviado: 01/Noviembre/2019 a las 10:52 |
Yo creo recordar que era un complemento, más que un servicepack. Pero si, de "saque" no imprimia PDF
|
|
anjemalo
Habitual Unido: 31/Mayo/2019 Localización: España Estado: Sin conexión Puntos: 51 |
Enviado: 01/Noviembre/2019 a las 11:13 |
Gracias lo voy a probar y os digo
|
|
anjemalo
Habitual Unido: 31/Mayo/2019 Localización: España Estado: Sin conexión Puntos: 51 |
Enviado: 01/Noviembre/2019 a las 18:12 |
Hola: He probado con objAccess.Visible=True y me abre el informe en Access con esta instruccion: DoCmd.OpenReport "R_InformeDiario", acPreview pero la instruccion de DoCmd.Output..... no hace nada y no da ningun error. En cuanto a los complementos de Access lo tengo instalado Todo en el ordenador y el Service Pack es el 3. Sabeis que puede ser? gracias
|
|
happy
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Moderador Unido: 29/Enero/2005 Localización: España Estado: Sin conexión Puntos: 3192 |
Enviado: 01/Noviembre/2019 a las 20:16 |
Una duda, ¿desde dónde pretendes imprimir el pdf, desde la base de datos actual o desde la base de datos que referencias con objAccess? Si quieres que las instrucciones DoCmd.OpenReport ... y Docmd.Output las ejecute la base referenciada con objAccess debes de indicarlo expresamente. Es decir objAccess.DoCmd.OpenReport "R_InformeDiario", acPreview objAccess.DoCmd.OutputTo acOutputReport, "R_InformeDiario", acFormatPDF, CurrentProject.Path & "\fichero.pdf", True |
|
Saludos,
Juan M. Afan de Ribera |
|
anjemalo
Habitual Unido: 31/Mayo/2019 Localización: España Estado: Sin conexión Puntos: 51 |
Enviado: 01/Noviembre/2019 a las 20:27 |
Muchas gracias, eso era. Ahora funciona perfectamente. |
|
Responder | |
Tweet
|
Ir al foro | Permisos de foro Usted No puede publicar nuevos temas en este foro Usted No puede responder a temas en este foro Usted No puede borrar sus mensajes en este foro Usted No puede editar sus mensajes en este foro Usted No puede crear encuestas en este foro Usted No puede votar en encuestas en este foro |