[AccessD] [SPAM SUSPECT] Opening password protected database

Rocky Smolin - Beach Access Software bchacc at san.rr.com
Fri Jul 14 12:49:41 CDT 2006


That done it.

Rocky


Bobby Heid wrote:
> Rocky,
>
> Try changing "pwd=" to ";pwd=".
>
> Bobby
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin -
> Beach Access Software
> Sent: Friday, July 14, 2006 12:44 PM
> To: Access Developers discussion and problem solving
> Subject: [SPAM SUSPECT] [AccessD] Opening password protected database
> Importance: Low
>
>
> Dear List:
>
> I am trying to open a password protected database using the following:
>
> Set db = CurrentDb
> MsgBox db.Name
> Dim strPWD As String
> strPWD = "shannon"
> Dim strDB As String
> strDB = Left(db.Name, Len(db.Name) - 6) & "BE.mdb"
> Set db = DBEngine.OpenDatabase(strDB, False, False, "pwd=" & strPWD)
>
>
> Set db = DBEngine.OpenDatabase(db.Name, False, False, "pwd=" & strPWD)
>
> I used Set db = CurrentDb just to be sure I was getting the exact path 
> and file name of the back end and strDB does indeed have the correct 
> path and filename of the back end.  The password is also correct.
>
> What am I doing wrong?
>
> Maybe there's a simpler way? The client wants to have the back end 
> password protected, so instead of using the simple set db=Currentdb 
> everywhere in the app I guess I have to use some syntax which specifies 
> the password.  All the tables in the back end are linked.
>
> MTIA
>
> Rocky
>
>   

-- 
Rocky Smolin
Beach Access Software
858-259-4334
www.e-z-mrp.com





More information about the AccessD mailing list