Hi
I have this code and need to convert from dao to ado
Set dbs = CurrentDb()
Set qdf = dbs.QueryDefs("Get Selected Growers")
qdf.PARAMETERS("[Forms]![Faxes]![Year]") = Forms!Faxes!Year
qdf.PARAMETERS("[Forms]![Faxes]![Order]") = Forms!Faxes!Order
qdf.PARAMETERS("[Forms]![Faxes]![Suffix]") = Forms!Faxes!Suffix
Set rst = qdf.OpenRecordset(dbOpenSnapshot)
'Set rst = dbs.OpenRecordset(ctl.RowSource, dbOpenSnapshot)
the statement in question is
Set rst = qdf.OpenRecordset(dbOpenSnapshot)
can anyone help by converting this to ADO or suggest another method. I am using ADO because the database has been moved to SQL server.
Thanks
Mike