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 - 29/10/2010 17:16:11 Reporta abuso | Link Permanente
Roosvelt
Usuario no registrado
RE: Ayuda plis, generar PDF de Crystal Reports sin visualizar reporte.

Responder Citar
Gracías funciono correctamente. ¿Y si quisiera que abriera el archivo PDF" de forma automatica despues de exportarla
Volver arriba

#3 - 10/06/2008 21:52:07 Reporta abuso | Link Permanente
Julio
Fecha de registro: 28/08/2008
1 post en este tema
1 post en familia visual studio
11 posts en todos los foros
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