“这种对象类型不支持该操作”如何解决？？？

程序开头是这样连接数据库的：
Dim dbs As Database
Dim rst As Recordset Dim rs