Data Report Problem

[iqkh]

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"

[Hack]

Do you have a field called qt1 in your table?

[iqkh]

qt1 is the result of a sql query.

e.g. Select * as qt1 from table

Thanks

[Hack]

I think that is the item that is "missing" then. .DataField = rs("something") is looking for "something" to be a field contained within a Db, not a field contained within a recordset object.

[brucevde]

Your code does not make sense. You are trying to perform a With...End With block on an expression. I am suprised it even compiles.

The DataField property should be set to the name of the field within the recordset, not the field's value.

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