处理加了密码的MDB文件[Access防范]

1、 利用 DAO 号令翻开MDB文件: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 属性 (MDB文件名称 / 含途径)
2、设定 Connect 属性,將预设的字串 "Access" 改成 ";Pwd=密码" (不含双引号)
3、设定 RecordSource 属性

2、

利用 ADO 号令翻开MDB文件:

在利用 ADODC 或 DataEnvironment 设定好之后,直接操纵属性窗口改正 ConnectionString 属性(从属于 ADODC) 或 ConnectionSource 属性(从属于 DataEnvironment 的 Connection 控件),改正的办法是在属性之后增添以下参数:
;Jet OLEDB:Database Password=密码

除了 ADODC 及 DataEnvironment 之外, 直接利用 ADO 控件來翻开含有密码的 mdb MDB文件,设定参数的办法也是相同的.

3、

紧缩加了密码的MDB文件:CompactDatabase

DBEngine.CompactDataBase "原MDB文件", "新MDB文件", , , ";pwd=密码"
实例比方:
DBEngine.CompactDatabase "C:\Db1.mdb", "C:\DB2.mdb", , , ";pwd=1"

4、

修复加了密码的MDB文件: RepairDatabase

没必要理睬MDB文件设定的密码!
DBEngine.RepairDataBase "MDB文件"
实例比方:
DBEngine.RepairDataBase "C:\Db1.mdb" 　　以上是“处理加了密码的MDB文件[Access防范]”的内容，如果你对以上该文章内容感兴趣，你可以看看七道奇为您推荐以下文章：