How to open a database with a password ?

Hi,

Here is what I wrote:

Quote:

---

'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
____________________

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")'

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

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

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

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]

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 OLEDB:Database Password=yourpwd;"

hope this helps
by!:)