Visual Basic - Crystal Reports y VB

Hola colegas:

tengo un problema al abrir un reporte con crystal, mi codigo es el siguiente:

Set objReport = Nothing
Set objReport = CRapp.OpenReport("C:\mireporte.rpt", 1)
Set crParametros = objReport.ParameterFields
For Each crParametro In crParametros
Select Case crParametro.ParameterFieldName
Case "FechaIn"
crParametro.AddCurrentValue (dtDe.Value)
Case "FechaFin"
crParametro.AddCurrentValue (dtHasta.Value)
End Select
Next
With frmReport.crReport
.ReportSource = objReport
.ViewReport
.DisplayGroupTree = False
.EnableGroupTree = False
frmReport.Caption = "Mi reporte"
frmReport.Show
End With

pero al ejecutarce el reporte me manda un mensaje "el servidor aun no ha sido abierto" y no me extrae nada de info.

Que puedo hacer?
Gracias anticipadas!!