用DAO如何打开带密码的Access数据库？？？求高手帮忙？

Question

假设密码是321
我用
Public db As Database
Set db = OpenDatabase("路径", False, False, ";PWD=321")
打不开数据库，提示密码错误。
郁闷。

Answer 1

' 通過 DBEngine 壓縮文件，注意，您必須引用 Microsoft DAO 3.xx Object Library
      DBEngine.CompactDatabase SourceFile, strTempFile, , , ";Pwd=" & Password & ";"我很少用dao的...

Answer 2

Set DB = OpenDatabase(DatabaseName, False, False, ";Pwd=密码")

Answer 3

http://access911.net/index.asp?board=4&mode=3&recordid=73FAB11E15DC自己去這個站上找

Answer 4

、 使用 DAO 語法開啟資料庫：OpenDatabase 
 若要由程式中開啟，語法如下：
Set DB = OpenDatabase(DatabaseName, False, False, ";Pwd=密碼")
實例例如：
Dim db As Database
Set db = OpenDatabase("C:\db1.mdb", False, False, ";Pwd=1")
若要使用 Data 控制項，設定方法如下：
1、設定 DatabaseName 屬性  ( 資料庫名稱 / 含路徑 )
2、設定 Connect 屬性，將預設的字串【Access】改成【;Pwd=密碼】 ( 不含雙引號 )
3、設定 RecordSource 屬性   ( 資料集 )