Dim db As DAO.Database Dim rs As DAO.Recordset Set db = OpenDatabase("C:\MyDatabase.accdb")
Because Office 32-bit is