| ||||
| Utilizar Crystal Reports 9 desde VB 6 Hola a todos: Antes tenía Cristal 8.5 y este tenía un Control que se llamaba Crystal Reports Control, ese lo agregaba en mis formulario de VB 6 y para ejecutar un reporte desde mi aplicación de VB hacía lo siguiente: Suponiendo que el control que agregué se llama Reporte, tengo: Reporte.ReportFileName = App.Path & "\Reports\CatalogoCta.rpt" Reporte.Destination = crptToWindow Reporte.Action = 5 Pero ahora con el Crystal 9 me han cambiado todo, alguien sabe como se hace con Crystal Report 9???? PD: El que quiera bajarse la versión Trial del Cristal puede hacerlo desde aquí: http://ftp.crystaldecisions.com/webp...d/CR9AEval.zip Your Crystal Reports Advanced Edition installation key code is: AVS54-01CGSWK-GEPNZC9 Your Crystal Enterprise Reports Application Server installation key code is: ASM54-G0CSUWK-SY3UZY7
__________________ .::RsOfT::. --El que se aferra a lo conocido, nunca conocerá lo desconocido-- --Es intentando lo imposible como se realiza lo posible-- --Es de pésimo gusto contentarse con algo mediocre cuando lo excelente está a nuestro alcance-- |
| ||||
| Yo logré que se imprimiera mediante este código:
Código:
Pero se imprime directamente sin verse por pantalla, como lo podría hacer para que salga por pantalla, pero sin utilizar el Crystal Viwer??? 'Rutina que genera reporte Crystal de plantilla de cuadrillas existente 'Hay que agregar la Referencia: Crystal Reports 9 ActiveX Designer Run Time Library Dim appl As New CRAXDRT.Application Dim report As New CRAXDRT.report Set report = appl.OpenReport(App.Path & "\Reports\CatalogoCta.rpt") report.PrintOut False 'SE IMPRIME UNA COPIA DIRECTAMENTE Porque con el viwer hay que crear un formulario por cada reporte a utilizar. Lo logré hacer con el viwer mediante esta explicación (Explicacion ), pero no me gustó por lo dicho anteriormente... Lo que quiero que me salga por pantalla sin tener que crear un formulario exclusivo para el reporte. Como lo hago?
__________________ .::RsOfT::. --El que se aferra a lo conocido, nunca conocerá lo desconocido-- --Es intentando lo imposible como se realiza lo posible-- --Es de pésimo gusto contentarse con algo mediocre cuando lo excelente está a nuestro alcance-- |
Este tema le ha gustado a 1 personas (incluyéndote)