12/01/2009, 23:31
|
| | | Fecha de Ingreso: octubre-2008
Mensajes: 24
Antigüedad: 15 años, 7 meses Puntos: 0 | |
| Respuesta: Enlazar un reporte de Crystal
saludos este ejemplo que te envío es para abrir un reporte existente (Crystal Report 9) mediente código, espero te sea util...
Lo primero que debes hacer es habilitar la referencia Crystal Reports Activex Desginer Design and Runtime Library 10.2
Luego en el formulario que va a mostrar el reporte debes instanciar el control CrViewer9, si no tienes en tu cuadro de controles lo puedes agregar en Componentes y activas El Crystak Report Viewer Control 9.
El codigo sería el siguiente
Dim CrApp As New CRAXDDRT.Application
Dim CrReporte As New CRAXDDRT.Report
'Ruta del reporte
Set CrReporte = CrApp.OpenReport("C:\reporte.rpt", 1)
'Titulo del reporte
CrReporte.ReportTitle = "Listado General de Materiales"
'crVistaReporte --> control crViewer9
Me.crVistaReporte.ReportSource = CrReporte
Me.crVistaReporte.ViewReport
Espero poder haberte dado una mano ... |