I am using the correct one lines from the saved query to construct the record set. And even though it works fine from the Qeury designer, it won't work from VBA for some reason.

Did you say there was a way to get the recordset from the saved query directly and use it in VBA? I can't seem to find any information on that. Could you elaborate on that?

-Roni

Roni Estein
Roni.Estein@e-drugscanada.com
https://www.e-drugsCanada.com

    Dim rstAuthors As ADODB.Recordset
    Dim strCnn As String
    Dim strMessage As String
    Dim intCommand As Integer

    ' Open recordset from Authors table.
        strCnn = currentproject.connection

    Set rstAuthors = New ADODB.Recordset
    rstAuthors.CursorType = adOpenStatic
    ' Use client cursor to enable AbsolutePosition property.
    rstAuthors.CursorLocation = adUseClient
    rstAuthors.Open "Authors", strCnn, , , adCmdTable

"Authors" is a table name, but you can use a query.

Dim cn As ADODB.Connection
   Set cn = CurrentProject.Connection

   Dim rs As New ADODB.Recordset
   'open the greenridge export query
   rs.Open "Authors", cn, adOpenForwardOnly, adLockOptimistic


Sal

Hi Sal,

Thank you so much, I don't know how you fiind the time to contribute so rapidly like this.

Much appreciated
-Roni

Roni Estein
Roni.Estein@e-drugscanada.com
https://www.e-drugsCanada.com

There is not much work today

Sal