当 MDB 文件加了密码,直接由 Access 打印MDB文件时,会出现密码对话框,询问密码。但是若要由 VB 程序中打印,必須更改 VB 程序中打开MDB文件的指令,否则会出现错误信息!以下针对各种情况,分別加以说明: fyasp.com 1、 使用 DAO 命令打开MDB文件:OpenDatabase 中国风云在线 若要由程序中打开,命令如下: 风云在线fyasp.com Set DB = OpenDatabase(DatabaseName, False, False, ";Pwd=密码") 实例: fyasp@com Dim db As Database Set db = OpenDatabase("C:\db1.mdb", False, False, ";Pwd=1")
若要使用 Data 控件,设定方法如下: 中.国.fyasp.com 1、设定 DatabaseName 属性 (MDB文件名称 / 含路径) 2、设定 Connect 属性,將预设的字串 "Access" 改成 ";Pwd=密码" (不含双引号) 3、设定 RecordSource 属性 Www.fyasp.com 2、使用 ADO 命令打开MDB文件: 风云源码 在使用 ADODC 或 DataEnvironment 设定好之后,直接利用属性窗口修改 ConnectionString 属性(附属于 ADODC) 或 ConnectionSource 属性(附属于 DataEnvironment 的 Connection 控件),修改的方法是在属性之后增加以下参数: ;Jet OLEDB:Database Password=密码
除了 ADODC 及 DataEnvironment 之外, 直接使用 ADO 控件來打开含有密码的 mdb MDB文件,设定参数的方法也是相同的。 fyasp.com 3、压缩加了密码的MDB文件:CompactDatabase 中.国.fyasp.com DBEngine.CompactDataBase "原MDB文件", "新MDB文件", , , ";pwd=密码" 风云.在线 实例例如: 风云源码fyasp.com DBEngine.CompactDatabase "C:\Db1.mdb", "C:\Db2.mdb", , , ";pwd=1" fyasp.com 4、修复加了密码的MDB文件: RepairDatabase 风云.在线 不必理会MDB文件设定的密码! Www.fyasp.com DBEngine.RepairDataBase "MDB文件" Www^fyasp^com 实例例如: 中.国.fyasp.com DBEngine.RepairDataBase "C:\Db1.mdb" 风云在线fyasp.com
|