关于VB6+SP5的Data控件，连接带有密码的Access2000数据库的问题！！！

各位，谁知道怎样用Data控件连接一个带有密码的Access2000数据库！

我在Data控件的属性中没有找到关于输入密码的地方，我使用的环境是VB6+SP5；

对不起，先！

如果您是要我引用ADODB、RDO、DAO的方法来解决此问题的话，请不要回复因为本人知道答案；但有一种例外，因为本人需要用Data控件连接本地Access2000数据库，再用CrystalReports4.6控件连接Data控件完成一个报表输出的操作。但Access2000是一个有密码的数据库，我无法用Data控件正确连接（密码去除后当然可以）。当然，我必须使用Data + CrystalReports4.6控件的方式来完成。

请高手赐教！！！

7 个解决方案

#1

使用 Data.Connect 属性加上密码即可

#2

使用 Data 控件打开 Accecc 数据库：
设置 Connect 属性为 ;pwd=密码
Data1.Connect = ";pwd=密码"

#3

在数据连接属性-》所有-》第六行输入你的密码
在连接-》保留密码打勾，空白密码不选

#4

Set db = OpenDatabase("f:\vbjz\jz1.mdb", False, False, ";pwd=1")

#5

使用 Data 控件打开 Accecc 数据库：
设置 Connect 属性为 ;pwd=密码
Data1.Connect = ";pwd=密码"
修改密码：
Data1.Database.NewPassword _老密码_, _新密码_

#6

'应该用:

Private Sub Form_Load()
    Data1.Connect = ";pwd=123"
    Data1.DatabaseName = "C:\进销存.mdb"
    Data1.RecordSource = "库存管理"
    Data1.Refresh
End Sub

#7

请参考
http://expert.csdn.net/Expert/topic/2710/2710006.xml?temp=8.526248E-02

#1