Dim cnn As New ADODB.Connectioncnn.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;" _
        & "Data Source=" & App.Path & "\newship.mdb;"我的newship设置了密码,但是用
cnn.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;" _
        & "Data Source=" & App.Path & "\newship.mdb;User ID=Admin;Password=***"  又不行 User ID=到底要填什么呢
请大家帮帮忙, 谢谢~

解决方案 »

  1.   

    Dim cnn As New ADODB.Connectioncnn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0; _
     & "Data Source=" & App.Path & "\newship.mdb;Persist Security Info=False;Jet _ OLEDB:Database Password=******""或者这样:
    在生成连接字符串的时候,有个“所有”选项卡,里面一条“Jet OLEDB:Database 
    Password”,编辑该值输入,你的数据库密码User ID和Password不要填,它们是Access的用户名和密码, 并不是可以打开数据库的密码.
      

  2.   

    Dim cnn As New ADODB.Connectioncnn.Open  "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                        "Data Source=" & App.Path & "\newship.mdb;" & _
                        "Jet OLEDB:DataBase Password=xxxx"