Dim Recordset As DAO.Recordset Debug.Print Set Recordset = CurrentDb.OpenRecordset(oSQL, dbOpenSnapshot)
Select allOpen in new window