I am unable to show the recordset in datareport

Set DataReport1.DataSource = rs

With DataReport1.Sections(3).Controls("Text1").DataField = rs("qt1")

End With

DataReport1.Refresh

it gives error "Item cannot be found in the collection corresponding to the requested name or ordinal"