Windows 7: Programmer access to MSAccess

rbassman98003 · 11 Dec 2012

Hello,
In Windows XP to gain programmers access to MSAcess you would
Shift+double-click. That doesn't work in Windows 7. Help? Thanks

Irene · 12 Dec 2012

Does anything in this Article help?
Nothing happens or an hourglass appears when multiple users try to open an Access database (.mdb) by using Windows Explorer or a shortcut

Kaktussoft · 12 Dec 2012

Quote: Originally Posted by rbassman98003

Hello,
In Windows XP to gain programmers access to MSAcess you would
Shift+double-click. That doesn't work in Windows 7. Help? Thanks

Shift+double-click does work on Windows 7 x64 home premium and all Windows 7 flavors.

Kaktussoft · 12 Dec 2012

Quote: Originally Posted by rbassman98003

Hello,
In Windows XP to gain programmers access to MSAcess you would
Shift+double-click. That doesn't work in Windows 7. Help? Thanks

What version of ms access? Shift+double-click just skips the startup code/startup form.

rbassman98003 · 12 Dec 2012

Using Office 2010

rbassman98003 · 12 Dec 2012

I have a laptop running Windows 7 Home Premium and a desktop running Windows
7 Ultimate and on neither machine does Shift+double-click do anything. No response at all whether it be an .mdb or an .accdb. I have databases that have
startup screens that I cannot get into the tables, queries, forms etc.

Kaktussoft · 13 Dec 2012

It should work! Bypass startup options when you open a database - Access - Office.com
Did you set AllowBypassKey property to FALSE (it should be true)?

Tip: create a new database with a startup form or startup code and try to bypass it using SHIFT key. Works?

Kaktussoft · 13 Dec 2012

Create a new database
Create a new module in that database
Paste the code as displayed below in it.
Change the red text with real database location you want to unlock
Put cursor in SetBypassProperty subrountine
Press F5 (means run)
Does is say "AllowBypassKey value is now: TRUE"?

It fixed the issue?

Code:

Option Compare Database
Option Explicit
 
Public Sub SetBypassProperty()
Const DB_Boolean As Long = 1
    ChangeProperty "D:\Ron\Docs\test\ff.accdb", "AllowBypassKey", DB_Boolean, True
End Sub
 
Function ChangeProperty(DbName As String, strPropName As String, varPropType As Variant, varPropValue As Variant) As Integer
 
    Dim dbs As Object, prp As Variant
    Const conPropNotFoundError = 3270
 
    Set dbs = OpenDatabase(DbName)
    On Error GoTo Change_Err
    dbs.Properties(strPropName) = varPropValue
    ChangeProperty = True
    MsgBox "AllowBypassKey value is now: " & dbs.Properties(strPropName).Value
 
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

rbassman98003 · 18 Dec 2012

Just wanted to let you know I found the resolution to my issue today. Through trial and error, I found
that if you open Access, go to File\Open and select that,
locate the .mdb database you are wanting to modify, highlight it, hold the Shift key down and click on the Open button the database will open in "programmer mode" so you can modify it. I'm going to mark this as solved and I appreciate your help...

Windows 7: Programmer access to MSAccess

Programmer access to MSAccess problems?