vb and crystal reports 10

I am using crystal reports version 10 and vb6 and mysql database

I am connecting with crystal reports using connectionstring and not odbc.

I intend to use connectionstring.

I am using reference crystal reports activex designer run time library 10.0
and component is crystal activex report viewer library 10.0

what I do to open rpt report with vb6 is

1. open database connection
2. open recordset

Set crApp = New CRAXDRT.Application
Set crReport = crApp.OpenReport(App.Path & "\report.rpt")

crReport.DiscardSavedData
crReport.Database.SetDataSource rs
crReport.RecordSelectionFormula = strfilter
Form2.crviewer.ReportSource = crReport
Form2.Show
Form2.WindowState = vbMaximized
Form2.crviewer.ViewReport

however, I am getting error attached here.

Attached Images

Image may be NSFW.
Clik here to view.