[AccessD] Problem converting code

Have you tried to explicitly declare your database and recordset as DAO ??

    Dim dbs As DAO.Database, rst As DAO.Recordset


--
Gary Kjos
garykjos at gmail.com