Crystal Report - conexion CR con VB 6.0

Hola, quisiera saber si alguien puede ayudarme con la conexion de crystal reports con visual basic pues ya tengo los reportes hechos y solo me falta enviarle al objeto crystal reports la cadena de conexion con la base de datos la cual posee contraseña, ojala y puedan ayudarme

holas yo estoy haciendo lo mismo ... pero que entranpado en esta parte ya que cuando se abre elcrystal report desde visual me sale un mensaje de error que dice "el servidor aun no a sido abierto" .... aqui te mando mi codigo a er si a ti te funca ....

yo creo que mi problema es algo de configuracion pq todo lo que he invistigado no se hace nada mas para conectar la base de datos con el reporte.

Set crReport = crApp.OpenReport(App.Path & "\Reporte.rpt", 1)

s_name = reportTable.LogOnServerName
d_name = reportTable.LogOnDatabaseName
user = reportTable.LogOnUserID

crReport.Database.Tables(1).SetLogOnInfo s_name, d_name, user, ""

crViewer.ReportSource = crReport
crViewer.ViewReport
Screen.MousePointer = vbDefault

Hola a los dos

Mirar creo que os puede faltar decirle donde se debe conectar.

Probar con esto

No se si te funcioanra con el crView

CrViewer.connect = Y TU CADENA DE CONNEXION

Gracias tu respuesta es muy acertada pues esa es la propiedad que estoy utilizando, el problema es que no me falta nada mas que eso!!!, la cadena de conexion pues la base de datos es Access y tiene contraseña, y no se cual es el formato de la cadena para mandar a desplegar el reporte.
Ojala y me pudieras decir cual es ese formato

Private Crystal As New CRAXDRT.Application
Private Reporte As New CRAXDRT.Report
Private BasedeDatos As CRAXDRT.Database
Private Tablas As CRAXDRT.DatabaseTables
Private Conexion As CRAXDRT.DatabaseTable

Set BasedeDatos = Reporte.Database
Set Tablas = BasedeDatos.Tables
Cont = 1
For Each Conexion In Tablas

Conexion.SetDataSource "D:\visual Basic\base.mdb"

Cont = Cont + 1
If Err <> 0 Then
MsgBox Err.Description
Err.Clear
End If

Next Conexion

esto me funciona , probalo