www.es-asp.net / Foros ASP.NET / Familia Visual Studio / Ayuda plis, generar PDF de Crystal Reports sin visualizar reporte.
Mensaje dentro de Familia Visual Studio
Responder 
#1 - 18/01/2008 15:17:44 Reporta abuso | Link Permanente
mkpopper
Fecha de registro: 03/12/2006
0 post en este tema
2 posts en familia visual studio
4 posts en todos los foros
Ayuda plis, generar PDF de Crystal Reports sin visualizar reporte.

Responder Citar
Hola a todos, espero que me puedan ayudar con el siguiente problemilla. Estoy haciendo una aplicacion WinForm en C# (se que VB es mejor para WinForm.. pero son ordenes del jefe.. ). Mi problema es que tengo que generar unos reportes en PDF, estos reportes son unas planillas de remuneraciones, es decir se debe generar un PDF por cada persona con su detalle. Ya tengo solucionado el formato o plantilla para llenar con la informacion; pero mi problema es como puedo generar a traves de codigo cada uno de estos PDF (vasandome en la plantilla .rpt) sin tener que visualizarlo por pantalla, algo como apretar un boton y que deje en una carpeta los PDF.

Bueno esperando haber dejado claro mi consulta, de antemano muchas gracias a todos.
Volver arriba
Respuestas
Mostrar de en 15
#2 - 10/06/2008 21:52:07 Reporta abuso | Link Permanente
Julio
Usuario no registrado
RE: Ayuda plis, generar PDF de Crystal Reports sin visualizar reporte.

Responder Citar
Acá está una subrutina para crear un PDF.
_sPathReporte es la ruta donde está el archivo de Crystal (.rpt).
_Reporte es el nombre del archivo .rpt.
adjunto es el nombre del archivo PDF que se va a generar.
Saludos.

 Private Sub Exportar(ByVal adjunto As String)
Dim rptDocument As New CrystalDecisions.CrystalReports.Engine.ReportDocument

_sPathReporte = CType(configurationAppSettings.GetValue("PathReportes", GetType(System.String)), String)
rptDocument.Load(_sPathReporte & _Reporte & ".rpt")
rptDocument.SetDataSource(_dtTabla)
ReportViewer.ReportSource = rptDocument

Dim filedest As New CrystalDecisions.Shared.DiskFileDestinationOptions
Dim o As CrystalDecisions.Shared.ExportOptions
o = New CrystalDecisions.Shared.ExportOptions
o.ExportFormatType = CrystalDecisions.Shared.ExportFormatType.PortableDocFormat
o.ExportDestinationType = CrystalDecisions.Shared.ExportDestinationType.DiskFile
filedest.DiskFileName = System.IO.Directory.GetCurrentDirectory() & "\" & adjunto & ".pdf"

o.ExportDestinationOptions = filedest.Clone
rptDocument.Export(o)

filedest = Nothing
o = Nothing
End Sub
Volver arriba
Mostrar de en 15