Informe con el CRViewer

Jonas
08 de Septiembre del 2003
Tengo el código siguiente para lanzar un reporte:'Declaramos los objetos
Dim RepApp As New CRAXDRT.Application
Dim repRep As CRAXDRT.Report
'Asignamos el report
Set repRep = RepApp.OpenReport(App.Path & "ReportesPólizas.rpt")
'Asignamos al visor el objeto report
CRViewer1.ReportSource = repRep
'Lo visualizamos
CRViewer1.ViewReport

Como le Digo que mis bases que usa el informe tienen contraseña?.

Saludos