用DAO打开加密的Access数据库出现问题

Question

看了以前的贴子，但是不知道为什么我用了下面的方法仍然出错，说密码无效。
Set Ws=DBEngine.workspaces(0)
Set db=Ws.OpenDatabase((数据库,false,,";pwd=密码")
Err.Number=3031:Not a valid password.
哪位高手帮帮我吧！

Answer 1

补充一点，我是用的DAO在创建数据库时给数据库设置的密码，是整个Access数据库的密码（和直接以独占方式打开Access数据库，然后设置数据库密码的效果一样)，而不是用户的密码（不是UID的密码），数据库没有设置用户，任何人只要知道密码就可以打开。

Answer 2

试试这样：先引用ＤＡＯ
Set mdbSys = OpenDatabase(数据库全路径, False, False,";pwd=密码")

Answer 3

看visdata－－VB自带的例子！内有很详细的代码及说明！！
如果想用dao就看visdata，把它看懂了，dao所有的问题都能自己解决！！