The object library is not registered in the Windows Registry.
You are trying to reference a method or property of the collection, but you have not assigned it to a variable first. For example, to reference the Name property, use the following:
Dim dbsPublish As Database
Set dbsPublish = OpenDatabase("BIBLIO.mdb")
dbname = dbsPublish.Name