Crystal Report - Como conecto VB6 con CR 10

Hola
alguien tiene algun codigo de visual 6 para poder ejecutar un reporte de cristal 10

Private Sub Form_Load()
Dim crReport As New CRAXDRT.Report
Dim crApp As New CRAXDRT.Application

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


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

Set crParamDefs = Nothing
Set crParamDef = Nothing
End Sub

' cuando creas las variables report y application debes asegurarte que en referencias hayas cargado las librerias, y los componentes correctos ok, cada version de crystal tiene componentes distintos, y el reporte debe de estar almacenado en la misma carpeta que el proyecto de vb.
componentes: crystal report viewer
referencias; crystal reports design run time