IDC资讯中心
当MDB文件加了密码，直接由Access打印MDB文件时，会出现密码对话框，询问密码。但是若要由VB程序中打印，必須更改VB程序中打开MDB文件的指令，否则会出现错误信息！以下针对各种情况，分別加以说明：
1、使用DAO命令打开MDB文件：OpenDatabase
若要由程序中打开，命令如下：
SetDB=OpenDatabase(DatabaseName,False,False,”;Pwd=密码”)
实例：
DimdbAsDatabase
Setdb=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控件)，修改的方法是在属性之后增加以下参数：
;JetOLEDB:DatabasePassword=密码
除了ADODC及DataEnvironment之外，直接使用ADO控件來打开含有密码的mdbMDB文件，设定参数的方法也是相同的。
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”->
