Ado Connection w/passworded Acces db

[theghost]

Can anyone help?

I can connect to my access 2k database without a password set in the databaase using an ado connection. If i try to connect with a password set I get an error. In the connection string i do not specify a user but i do specify a password "Password = pwd".

Can some one tell me what i am doing wrong or point me in the right direction.

Thanks,

Jason

[MKSa]

'Try the following code:
Private Sub Command1_Click()
   Dim Conn As New ADODB.Connection
   Conn.Open "Provider=MSDASQL;" & "Driver={Microsoft Access Driver (*.mdb)};" & _
      "Dbq=c:\new.mdb;" & "Uid=;" & "Pwd=pwd"
   Debug.Print Conn.State
   Conn.Close
   Set Conn = Nothing
End Sub

[jp140768]

This works for me:

Connection = Provider=Microsoft.Jet.OLEDB.4.0;Data Source = \\bifdomain1_pdc\it\jpart\KNOWLEDGE BASE.MDB;Jet OLEDB:System Database=\\bifdomain1_pdc\it\jpart\knowledge Base.MDW;User ID = USRUSR;Password=PWDPWDPWD;

Set adoConnection = New ADODB.connection
With adoConnection
.ConnectionString = connection
.Open
End With

USRUSR is the user id, and PWDPWDPWD is the password they have supplied.

[jp140768]

If the database is just password protected, the following should work:

Connection = Provider=Microsoft.Jet.OLEDB.4.0;Data Source = \\bifdomain1_pdc\it\jpart\KNOWLEDGE BASE.MDB;Jet OLEDB:Database Password=PWDPWDPWD;

Set adoConnection = New ADODB.connection
With adoConnection
.ConnectionString = connection
.Open
End With

PWDPWDPWD is the database password.

[Cristiane]

Hi..
I have the same problem of theghost... I've created a database in Access97 (OS Windows 98) and I didn't use password. Then I tried an ADODB connection with VB6, and it work. But when I created a password for my database, I can't connect anymore...
I was looking for this Forum and I've found this answer but, I tried all the solutions and no one solve my problem... Do you have any other suggestion or can indicate me what can I be doing wrong?
Thanks your help!
Cristiane

[stealbreeze]

Hi
I am having the same problems as stated in Cristiane's post.

Any suggestions.

Thanks,
SB

[klegesdal]

I was also having the same problem... and I finally found my answer... I'm sure this in some other posts...I just didn't recognize the format. Here is what I did.

set myConn = New ADODB.connection
with myConn
  .Provider = "Microsoft.Jet.OLEDB.4.0"
  .Properties("Jet OLEDB:Database Password") = "myPassword"
  .Open "\myFilePath\myFile.mdb"
end with

this worked...

I was trying to pass the password in the open statement...but it was giving me a error....

hope this helps someone.

kenny

[jp140768]

You can do the same thing using a connection string. One of the easiest ways of setting up a connection string, is to create a UDL file to your database, filling in all the parameters. You can then open this file using notepad, and copy its contents into your connection string.