Hi guys-
I am currently using Crystal report but it givessme the error. Most probably I am missing something. I attached the following code , please if anybody identify, let me know it.

'generel section i am calling class from my DLL which work
'fine for other cases

Option Explicit
Private devb21 As DevNumberA11.clsB21

Private Sub Form_Load()
Screen.MousePointer = vbHourglass
Dim Report As New CrystalReport1
Dim adors1 As ADODB.Recordset
Set devb21 = New DevNumberA11.clsB21
'i am calling sql from my DLL which works perfectly for
'list view
Set adors1 = devb21.TestReport()

Do Until adors1.EOF
Report.Text1= adors1.Fields("DevName")
'Here its giving me error: Object does not
'support property or method
adors1.MoveNext
Loop
adors1.Close
Report.Database.SetDataSource adors1
frmTestReport.CRViewer1.ReportSource = Report
frmTestReport.CRViewer1.ViewReport

frmTestReport.CRViewer1.Visible = True

Screen.MousePointer = vbDefault

End Sub

Waiting eagerly for your reply

Sohel