How to open a database with a password ?

[Remy Roy]

Hi,

Here is what I wrote:

'DB is a database object
'DBE is a DBEngine object
'FileName refer to the file to open
Set DB = DBE.OpenDatabase(FileName, False, , "Microsoft Jet Database; pwd=mypass")
'The password for the file is mypass

I'm getting an "Not valid password" everytime.

What is wrong with this code ?
Bye

------------------
____________________
Message from
Remy Roy
____________________

[JHausmann]

Dumb question but do you have a userid or are you trying to connect as admin (in Access)?

The string '"Microsoft Jet Database; pwd=mypass")' would become '"Microsoft Jet Database;UID=; pwd=mypass")'

[Remy Roy]

The addtition of UID did not remove the not valid password error.

------------------
____________________
Message from
Remy Roy
____________________

[JHausmann]

Can you open the database in Access and do you have to use a user id / password to use Access?

[chriskeeble]

I have exactly the same problem...

I only need to enter a password when opening the database in Access, when I try through VB it simply gives the Not A Valid Password error.

Please can someone e-mail me if a response is given as I won't be auto-notified (not my posting). Thanks!

------------------
Chris Keeble
www.giglist.com
mailto:[email protected]

[hemali]

i don't know about dbengine, but iwth normal ado recordset. the syntax ia as follows:

set the provider as follows
sProvider = "PROVIDER=Microsoft.Jet.OLEDB.4.0.0;" & "Data Source=" & yourdbname & ";Jet OLEDBatabase Password=yourpwd;"

hope this helps
by!