Best way to display VBA query results?

What is the best way to display the results from a VBA query in Access (97)?

User fires of query with a button click. I just want to open up a table view of the results but since I am new to Access dev I am not sure how to do this.

Code is:



How do I open the RecordSet up in a table (view)?

Many thanks

The quickest way would be to save the sql as a query, then open that in code as follows:

docmd.openquery "QueryName"

To view the record set you need to create a temporary query to view and then delete the temp query when finished. Use the following code to create a temporary query that is named tmpProductInfo

Dim dbs As Database
Dim rs As Recordset
Dim qdf As QueryDef
Dim productName As String
Dim strSql As String

Set dbs = CurrentDb()

productName = "ADSL"

strSql = "SELECT [Information].* From [Information] WHERE [Information].Product = " & Chr(34) & productName & Chr(34) & ";"

Set rs = dbs.OpenRecordset(strSql, dbOpenSnapshot)

With dbs
Set qdf = .CreateQueryDef("tmpProductInfo", strSql)
DoCmd.OpenQuery "tmpProductInfo"
.QueryDefs.Delete "tmpProductInfo"
End With
dbs.Close
qdf.Close

lwells

Thanks a million Iwells

This is exactly what I needed to create a query on the fly.

Works like a dream.