Crystal Report - Migrar a CR XI

Hola a todos

Me he hecho con la Versión XI de CR
Antiguamente tenia la 8.5 y para conectar con CR tenia estas instrucciones

Dim LaAplic As CRPEAuto.Application
Dim ElReport As CRPEAuto.Report
Dim LaBase As CRPEAuto.Database, Tablas As CRPEAuto.DatabaseTables
Dim Param(1 To 11) As CRPEAuto.ParameterFieldDefinition
Dim Orden As CRPEAuto.SortFields

Ahora no se donde referencia CPEAuto o si existe siquiera en la versión XI

Podrían ayudarme por favor.

Un Saludo, Luis

Te pongo un ejemplo de los cambios con Crystal XI espero que te ayuden

Option Explicit
Private crApp As New CRAXDRT.Application
Private crReport As New CRAXDRT.Report
Private mstrParametro1 As Double
Private mlngParametro2 As Long

Private Sub Form_Load()
Dim crpparamdefs As CRAXDRT.ParameterFieldDefinitions
Dim crpparamdef As CRAXDRT.ParameterFieldDefinition
'Abrir el reporte
Screen.MousePointer = vbHourglass

On Error GoTo ErrHandler
Set crReport = crApp.OpenReport(App.Path & "\rpt\" & frmInformes.Text1.Text, 1)
'crReport.SQLQueryString = "Tu consulta SQL" ' esta
'consulta es opcional

' Parametros del reporte
crReport.EnableParameterPrompting = False
Set crpparamdefs = crReport.ParameterFields
For Each crpparamdef In crpparamdefs
With crpparamdef
Select Case .ParameterFieldName
Case "DateFrom"
.ClearCurrentValueAndRange
.GetNthCurrentValue frmInformes.dtIntervaloInicial.Value
Case "DateTo"
.ClearCurrentValueAndRange
.GetNthCurrentValue frmInformes.dtIntervaloFinal.Value
End Select
End With
Next

CrystalActiveXReportViewer1.ReportSource = crReport
CrystalActiveXReportViewer1.DisplayGroupTree = False
CrystalActiveXReportViewer1.ViewReport

Screen.MousePointer = vbDefault

ErrHandler:
If Err.Number = -2147206461 Then
MsgBox "El archivo de reporte no se encuentra, restáurelo de los discos de instalación", _
vbCritical + vbOKOnly
End If
Screen.MousePointer = vbDefault

End Sub