请问 数据库有密码 data控件怎么用？

本来是
Data1.DatabaseName = App.Path & "\EPMSDT\EPMSDB.mdb"
现在数据库加了密码 我按照网上说的 加上一句 Data1.Connect = ";pwd=" & Sqlpassword
结果提示说数据库不是可识别的格式
可是我直接双击输入密码就可以打开
请问该怎么做呢？

解决方案 »

  1.   

    Data控件没有用过，
    用ADODC可以吗？
      

  2.   

    "User ID=Admin;Jet OLEDB:Database Password=740701;Data Source=XXXX.mdb"
      

  3.   

    Set DB = OpenDatabase(DatabaseName, False, False, ";Pwd=密码")
    实例例如：
    Dim db As Database
    Dim rs As Recordset
    Set db = OpenDatabase(App.Path & "\EPMSDT\EPMSDB.mdb", False, False, ";pwd=" & Sqlpassword)
    Set rs = db.OpenRecordset(Data1.RecordSource)Set Data1.Recordset = rs 
      

  4.   

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

  5.   

    "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\newdata.mdb;" & "Mode=Share Deny Read|Share Deny Write;Persist Security Info=False;Jet OLEDB:Database Password=123"
      

  6.   

    另，Data 控件只能支持 Access 97, 如果你用了 Access 2000 格式的库，它就不认识了，报不可识别的数据库格式。此时，引用 Microsoft DAO 3.6，去掉原来的 3.51（如果有的话），再用我上面写的代码就 OK 了。此时不能直接用 Data 控件，必须用 Database 和 Recordset 对象转接一下。
      

  7.   

    那个字符串连接的我知道
    可是
    我想用data控件
      

  8.   

    就是想用starsoulxp(星魂.NET) 说的那种方法
    可是不知道该怎么写  按照starsoulxp(星魂.NET) 说的不行