Has ANYONE had any luck opening a Crystal Report through VB6, which is based on an Access.mdb, that is password protected?

I am getting an error (CR type error):
Run-time error '-2147189176(80047e48
Logon failed.
Details: DAO Error Code: Oxbd7
Source: DAO Workspace
Description: Not a valid password.

VB Code:
  1. strConnectS = "Provider=Microsoft.Jet.OLEDB.4.0;" & _

  2.         "Data Source=" & App.Path & "\DB\MyDb.mdb;" & _

  3.         "Persist Security Info=True;" & _

  4.         "Jet OLEDB:Database Password=MyPassword"

  5.     With CnnStatusS

  6.         .CursorLocation = adUseClient

  7.         .Open strConnectS

  8.     End With

  9.     Set rsS = New ADODB.Recordset

  10.     Set objApp = New CRAXDRT.Application

  11.     Set objReport = objApp.OpenReport(App.Path & "\Db\" & RptSelect & ".rpt")

  12.        With objReport

  13.             Set objExportOptions = .ExportOptions

  14.         With objExportOptions

  15.             .DestinationType = crEDTDiskFile

  16.             .DiskFileName = App.Path & "\Temp\Report.pdf"

  17.             .FormatType = crEFTPortableDocFormat

  18.             .PDFExportAllPages = True

  19.         End With

  20.         

  21.         .ReadRecords

the error occurs on the .ReadRecords

yes, I have checked the password.