Conexión con Crystal Reports 8.0 sin DSN

Software utilizado con versiones: Visual Basic 6.0, Crystal Reports 8.0, bases de datos MySQL versión 5, conector MySQL ODBC driver versión 3.51.
Estoy intentando mostrar un informe de Crystal Reports desde VB sin crear un DSN de sistema y me aparece el error: "El servidor no ha sido abierto".
Por otra parte, con el DSN no tenemos problema, pero queremos evitar tener que agregar un DSN a cada máquina cliente (son muchas).
¿Sabrías decirnos cómo conectarnos sin DSN?. En el ámbito profesional, ¿cómo se realizan las conexiones a una BD?. ¿Podrías indicarnos un ejemplo o decirnos qué es lo que estamos haciendo mal?
A continuación te adjuntamos el código tal como lo tenemos ahora:
Private Sub Form_Load()
Private crApp As New CRAXDRT.Application
Private crCarta As New CRAXDRT.Report
Dim crxTable As CRAXDRT.DatabaseTable
Dim crParamDefs As CRAXDRT.ParameterFieldDefinitions
Dim crParamDef As CRAXDRT.ParameterFieldDefinition
flgContinuar = True
Set crCarta = crApp.OpenReport(App.Path & "\partes ptParteIncidencias.rpt", 1)
For Each crxTable In crCarta.Database.Tables
crxTable.SetLogOnInfo ">", ">", ">", ">"
Next
Set crParamDefs = crCarta.ParameterFields
crParamDefs.GetItemByName(">").AddCurrentValue (">")
CRViewer.ReportSource = crCarta
CRViewer.DisplayToolbar = True
CRViewer.DisplayTabs = True
CRViewer.DisplayGroupTree = False
CRViewer.EnableExportButton = True
CRViewer.ViewReport
Set crApp = Nothing
Set crCarta = Nothing
Screen.MousePointer = vbDefault
End Sub
El fichero del Report lo hemos creado con la librería PSOLEDB.DLL con la opción de convertir drivers.

1 respuesta

Respuesta
1
No veo la propiedad del datasource que es la parte esencial de conexión a cualquier base de datos, sugiero que vean la siguiente liga:
Para ver la posibilidad de conectarse sin crear un DSN...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas