Visual Basic - Reporte Crystal R. no abre si BD Access tiene Pasw

y en un formulario tengo cargado un CRViewer1 que carga un Reporte externo, que antes
de abrir le paso unos parametros para filtrar datos.

Bien este trozo de codigo que muestro funciona a la perfección pero cuando la base de
datos Access no tienen password

POR QUE???????

Si le coloco un passord me da el error al abrir el archivo c_remitoX (que es el nombre de la consulta que esta basado el reporte)

Espero su ayuda por favor!!!
Muchas Gracias

Set CRReport = CRApp.OpenReport(App.path & "\" & ReporteActual)

Dim crxDatabaseFieldDefinitions As CRAXDRT.DatabaseFieldDefinitions
Dim crxDatabaseFieldDefinition As CRAXDRT.DatabaseFieldDefinition

Set CRReport = CRApp.OpenReport(App.Path & "\" & ReporteActual)

Dim crxDatabaseFieldDefinitions As CRAXDRT.DatabaseFieldDefinitions
Dim crxDatabaseFieldDefinition As CRAXDRT.DatabaseFieldDefinition

Set crxDatabaseFieldDefinitions = CRReport.Database.Tables.Item(1).Fields

CRReport.DiscardSavedData
CRReport.FormulaFields(1).Text = "'BABILONIA'"
If FrmPresupuesto.Label1 = "FACTURA" Then
CRReport.FormulaFields(2).Text = "'FACTURA Nº'"
Else
CRReport.FormulaFields(2).Text = "'PRESUPUESTO Nº'"
End If
If CadenaBuscar = Empty Then CadenaBuscar = 0
cadena = "{c_remitoX.Pde_pre_id} = " & CLng(CadenaBuscar) & ""
CRReport.RecordSelectionFormula = cadena '

With CRViewer1
.DisplayGroupTree = False
.DisplayTabs = False
.EnableCloseButton = True
.ReportSource = CRReport
.ViewReport
End With

Yo te aconsejaria que trabajases siempre con tablas temporales, grabadas en local del usuario (si es multiusuario) y asi te ahorras cualquier problema por ejemplo el que tienes ahora.

Suerte,

SMK

Hola gracias por tu respuesta pero quisiera solucionarlo de esta manera ya que tengo la aplicacion armada y me falta solo eso. Ademas te sy sincero no tengo idea de como trabajar con tablas temporales, si me me orientas con un ejemplo te lo agradeceria.
Miguel