How to generate report based upon recordset

[longmatch]

I know that datareport can use dataEnvironment connection and command. Is there any way we can use recordset as datasource of data report?

Thanks

haijun

 

[tedsmith]

Try this
Open a Connection object to the database. Use the Connection object's Execute method to create a Recordset containing the desired records.

Then set the DataReport's DataSource property to the Recordset.

Set rs = conn.Execute("SELECT * FROM Books", , adCmdText)

' Connect the Recordset to the DataReport.
Set rptBooks.DataSource = rs
rptBooks.WindowState = vbMaximized
rptBooks.Show vbModal