The DAO Database object is accessible through the Admin property of an Ability Database. For example:
Set dbapp = CreateObject("AbilityDatabase.Application")
dbapp.Databases.Open("c:\my documents\mydata.adb", False)
Set db = ActiveDatabase
Set dbdao = db.Admin
Note that the first two lines would not be necessary if you were creating a macro inside Ability Database and already had a database open.
The above code creates a variable dbdao which is equivalent to the standard Database object in the DAO object model.