Reading Access Query as Dataset in Access VBA

[SChubb]

Hello All!

I am attempting to do something I thought was quite simple. I am trying to read an already-built query, within Access 2003, as a dataset in VBA.

Here is my code:
__________________________________________________ __________
Dim queryName As String
queryName = "PartsRequired"

Dim dbForecast As Database, rsData As Recordset
Set dbForecast = DBEngine.Workspaces(0).Databases(0)
Set rsData = dbForecast.OpenRecordset(queryName, dbOpenTable)
__________________________________________________ __________

The error I'm receiving is:
Run-time error '3219': Invalid operation.

I'm guessing my first problem is the "dbOpenTable" keyword on the last line. Unfortunately, I was unable to find something related to queries.

Can this be done in Access?

Thanks,
Steve

[pks00]

see if this works for you


Dim dbForecast As DAO.Database
Dim rsData As DAO.Recordset

Set dbForecast = currentdb
Set rsData = dbForecast.OpenRecordset(queryName)

[SChubb]

That did it! Thank you very much for your help.

Steve

[pks00]

Cool, glad to have helped


hey that was my 100th post

:)