As a simplified test I have witten a simple query qry_LOI3 thus:
Code:
SELECT EventTypes.EventCode, [TempVars]![Drv] AS Expr1 FROM EventTypes;
I then try to open it as a recordset, thus:
Code:
Public Sub TestProc() Dim db As Database, rs As Recordset Set db