Invalid Data Source

[KHD]

Hey People ..I have Invalid Data Source Warning when I preview VB data report
i am using ADODB recordset and SQL select starment.

Please help me healing this ERROR

thanks !!!

[fifeer]

Hi KHD,
i have the same problem. if you had solved , can you please write to me.
thanks...

[willakawill]

Hey People ..I have Invalid Data Source Warning when I preview VB data report
i am using ADODB recordset and SQL select starment.

Please help me healing this ERROR

thanks !!!

Hi. You will, no doubt, be aware that the pundits who frequent these pages rarely, if ever, boast about their psychic powers. In order to overcome this tragic failing on our part, would you kindly post your offending code?
Thanks :)

[KHD]

Dear All,
here is the Function I am using to initializ the report

[code]Private Function InitReport() As Boolean

Dim rpt As Object
Dim rsRPT As New ADODB.Recordset

If Not err.Number = 8520 Then
Select Case State
Case 1: 'rptData
If Not txt_Field(0) = "" Then

Set rptData = Nothing

Set rsRPT = dbConnection.Execute("select Visits.* from visits where visits.Vis_no= " & Val(txt_Field(0)) & " order by Vis_No ")

Set rptData.DataSource = rsRPT
' rptdata.ReportWidth = 200
InitReport = True

Else: MsgBox "Error"
End If
End Select
Else
InitReport = False
End If

End Function[/CODE

Thanks in advance