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
