
12/01/2011, 12:53
|
| | Fecha de Ingreso: enero-2011
Mensajes: 1
Antigüedad: 14 años, 2 meses Puntos: 0 | |
Respuesta: Problema con Crystal 10 + VB6 + SQL Server2K Cita:
Iniciado por KalaNag Ok, resolvi definitivamente el problema. Investigando en el site de businessobjects encontre una excelente [URL=http://support.businessobjects.com/global/interactive/xi/om/RDC/content.html]lista de objetos, propiedades y metodos[/URL] del ActiveX de Crystal.
El problema era que cada tabla de la conexion usada por Crystal en el reporte obtenia todos los datos de conexion menos el password. Al añadir el password, el reporte se muestra perfectamente.
Les dejo el codigo por si le sirve a alguno. Gracias a los que se interesaron, hasta luego...
Dim crxApp As New CRAXDRT.Application
Dim crxRpt As CRAXDRT.Report
Set crxRpt = crxApp.OpenReport(App.Path & "\reporte.rpt")
crxRpt.Database.LogOnServer "p2ssql.dll", "VIRTUAL2003", "basededatos", "sa", "cualquiercosa"
crxRpt.RecordSelectionFormula = "{requisiciones.id_requisicion} = " & 68
crxRpt.DiscardSavedData
crystal.ReportSource = crxRpt
For i = 1 To crxRpt.Database.Tables.Count
crxRpt.Database.Tables(i).ConnectionProperties.Ite m("Password") = "cualquiercosa"
Next i
crystal.ViewReport
crystal.Zoom 1
Set crxRpt = Nothing
Set crxApp = Nothing
Gracias por la respuesta, despues de una semana logre mi cometido gracias a esta respuesta. Excelente. |