Ver Mensaje Individual
  #14 (permalink)  
Antiguo 12/01/2011, 12:53
quintonocturna
 
Fecha de Ingreso: enero-2011
Mensajes: 1
Antigüedad: 14 años, 2 meses
Puntos: 0
De acuerdo Respuesta: Problema con Crystal 10 + VB6 + SQL Server2K

Cita:
Iniciado por KalaNag Ver Mensaje
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.