[AccessD] Opening Access 97

Gary,

I used the same thing...but from my past experience I will share 
this...build the backdoor FIRST!!!  The first db I disabled 
"AllowBypassKey"...I forgot about how to get back into it...lol..I ended up 
importing all objects...but scary at first.

Good luck.

Thanks,

Mark A. Matte


>From: "Bill Patten" <bill_Patten at earthlink.net>
>Reply-To: Access Developers discussion and problem 
>solving<accessd at databaseadvisors.com>
>To: "Access Developers discussion and problem 
>solving"<accessd at databaseadvisors.com>
>Subject: Re: [AccessD] Opening Access 97
>Date: Tue, 31 Oct 2006 12:34:17 -0800
>
>Hi Gary,
>
>I'm pretty sure I used this back in the 97 version
>
>Hope this helps.
>
>ChangeProperty "AllowBypassKey", dbBoolean, True ' (True to allow , false 
>to
>disallow)
>
>
>  Some of the others that may be handy.
>*****************************
>    ChangeProperty "StartupShowDBWindow", dbBoolean, False
>    ChangeProperty "StartupShowStatusBar", dbBoolean, True
>    ChangeProperty "AllowBuiltinToolbars", dbBoolean, True
>    ChangeProperty "AllowFullMenus", dbBoolean, True
>    ChangeProperty "AllowBreakIntoCode", dbBoolean, False
>    ChangeProperty "AllowSpecialKeys", dbBoolean, True
>*****************************
>Function ChangeProperty(strPropName As String, varPropType As Variant,
>varPropValue As Variant) As Integer
>   Dim dbs As Database, prp As Property
>   Const conPropNotFoundError = 3270
>   Set dbs = CurrentDb
>   On Error GoTo Change_Err
>   dbs.Properties(strPropName) = varPropValue
>   ChangeProperty = True
>
>Change_Bye:
>   Exit Function
>
>Change_Err:
>   If Err = conPropNotFoundError Then  ' Property not found.
>     Set prp = dbs.CreateProperty(strPropName, varPropType, varPropValue)
>     dbs.Properties.Append prp
>     Resume Next
>   Else
>     ' Unknown error.
>     ChangeProperty = False
>     Resume Change_Bye
>   End If
>
>End Function
>----- Original Message -----
>From: "Gary J. Giever" <gjgiever at myway.com>
>To: <accessd at databaseadvisors.com>
>Sent: Tuesday, October 31, 2006 12:14 PM
>Subject: [AccessD] Opening Access 97
>
>
>
>I remember having a program that prevented one from opening an Access 97
>database by holding down the shift key while opening the database, thus
>getting access to the tables. I can't find it now or maybe I imagined the
>whole thing. Does this sound familiar to anyone out there?
>
>
>Gary J. Giever, M.A.
>Applications Developer
>ACCMHS
>
>_______________________________________________
>No banners. No pop-ups. No kidding.
>Make My Way  your home on the Web - http://www.myway.com
>
>
>--
>AccessD mailing list
>AccessD at databaseadvisors.com
>http://databaseadvisors.com/mailman/listinfo/accessd
>Website: http://www.databaseadvisors.com
>
>--
>AccessD mailing list
>AccessD at databaseadvisors.com
>http://databaseadvisors.com/mailman/listinfo/accessd
>Website: http://www.databaseadvisors.com

_________________________________________________________________
Get FREE company branded e-mail accounts and business Web site from 
Microsoft Office Live 
http://clk.atdmt.com/MRT/go/mcrssaub0050001411mrt/direct/01/