Crystal Reports 10.0 y Visual Basic 6.0

[zemoreno]

Hola compañeros del foro...necesito ayuda, tengo un reporte creado en Crystal Reports 10.0 y un programa escrito en Visual Basic 6.0.

Necesito abrirlo desde mi programa, el unico inconveniente que tengo es que no lo puedo abrir por que mi base de datos que esta en Access tiene una contraseña, me marca un error del "Workspace" utilizando otra base de datos igual pero sin contraseña lo pude abrir, pero necesito que tenga una contraseña, les escribo el codigo que utilizo por si alguien puede hacer algo por mi, muchas gracias!

Dim crApp As New CRAXDRT.Application
Dim crReport As New CRAXDRT.Report

Set crReport = crApp.OpenReport(App.Path & "\..\Diseñadores\repProductos_2.rpt", 1)
crReport.SQLQueryString = "select * from Lista where Descripcion='ALGO'"

crysReporte.DisplayGroupTree = False

crysReporte.ReportSource = crReport
crysReporte.ViewReport

[ Asi funciona si mi base de datos no tiene contraseña, pero si tiene no lo abre... ]