Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Send Access 97 Password (VB5)

Status
Not open for further replies.

SLS

Programmer
Dec 12, 2001
14
BB
I have tried all the suggestions I have seen so far, I keep getting Invalid Password.
or
Could not find installed ISAM Files

I am Not using ODBC

Can anybody please give me the Simple OpenDatabase string for a simple Access 97 Password Protected Database.

Before protection I used the following Code....

DataBaseName1 = "ShawVideo(Terminal).mdb"
Set DataBase1 = Workspaces(0).OpenDatabase(DataBaseName1)

I have protected the Access Database just using a password to prevent users changing data.

I know it is something like...
Set DataBase1 = Workspaces(0).OpenDatabase(DataBaseName1,False,False,"psw=password")

But No Luck

Thanks

 
you're quite close

Set DataBase1 = Workspaces(0).OpenDatabase(DataBaseName1,False,False,";pwd=password")

add the semi-colon and use pwd not psw Good Luck
------------
Select * from Users where Clue > 0
0 rows returned
 
Thanks.....
Works fine now

It had to be someting simple
 
Set DataBase1 = Workspaces(0).OpenDatabase(DataBaseName1,False,False,";pwd=password")

And as I just finally firgured out, there can be no spaces after the pwd= or the password is sent with a leading space.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top