Results 1 to 5 of 5
  1. #1
    ohmydatabase's Avatar
    ohmydatabase is offline Advanced Beginner
    Windows 7 64bit Access 2016
    Join Date
    Feb 2017
    Posts
    79

    Microsoft References Automatically Updating in .accde

    Hey,



    So I have a mass distributed front-end that is used by many people with many different versions of Microsoft Office. I have made an .accdb file that I've shared in the network drive for people to copy to their local desktops. The idea was that people would have their own local version of the front-end. Before they ever open that file (locally), I've downgraded the references to very early versions of all the object libraries. When they open up the file locally, Access automatically updates their references to their version, whatever that is.

    Here's where things go wrong.

    People love to open the file directly from the network. (Despite me telling them not to!) When this happens it updates all the references in the file on the network and consequently breaks the file for everyone with an earlier version than the person who opened it. I've lost trust in people's ability to follow directions! (Don't know why I had that in the first place...)

    I plan on making a .accde file to distribute instead. I hoping that if a person opens the .accde file directly from the network, it will stop it from automatically updating the references.

    Does anyone know if this will work?

  2. #2
    ranman256's Avatar
    ranman256 is offline VIP
    Windows Vista Access 2010 32bit
    Join Date
    Apr 2014
    Location
    Kentucky
    Posts
    9,521
    no matter what version of access each user has, they ALL can run the old version .mdb.
    Always keep the BE tables on the server,
    and let users run the FE either on their PC or on THEIR folder on the network. (the network FE is easier to update)

  3. #3
    ohmydatabase's Avatar
    ohmydatabase is offline Advanced Beginner
    Windows 7 64bit Access 2016
    Join Date
    Feb 2017
    Posts
    79
    My understanding is that if a person can run the file, they can update the Object Library References. I want a file that will block a user from automatically updating these references and keep them in the currently set version.

    Either that, or I want to place the shared file in a place, or defined in such a manner, that will disallow a person from opening it. If I hide the file, my batch file wont copy it..

  4. #4
    ohmydatabase's Avatar
    ohmydatabase is offline Advanced Beginner
    Windows 7 64bit Access 2016
    Join Date
    Feb 2017
    Posts
    79
    Update: It seems that even the accde will update the Object Library Reference. I've just cracked down on everyone's ability to open said file

  5. #5
    ssanfu is offline Master of Nothing
    Windows XP Access 2010 32bit
    Join Date
    Sep 2010
    Location
    Anchorage, Alaska, USA
    Posts
    9,664
    I use code in the first form that checks to see if the drive is C:\ (local drive). dB MUST be opened from local computer (or "local" cloud computer)
    If it is not the local C:\ drive, I display a message that says it must be opened from the local c drive, then closes the dB.

    Code looks like this:
    Code:
    Private Sub Form_Open(Cancel As Integer)
        Dim d As Database, r As Recordset   ', s As Recordset
        Dim Msg
        Dim sDrive As String
    
        On Error GoTo login_open_error
    
        'check to see if the FE is on a non-networked drive
        'Debug.Print CurrentDb.Name
        sDrive = Left(CurrentDb.Name, 1)
        ' MsgBox sDrive
    
        ' "C" is local drive, "Z" is cloud drive (everyone's cloud is "Z". Cloud common drive is "H". 
        If sDrive <> "C" And sDrive <> "Z" Then
            Msg = "This front end (FE) databse MUST be opened from a local drive." & vbNewLine & vbNewLine
            Msg = Msg & "It cannot be started from a server (network) drive or a shortcut to a networked drive." & vbNewLine & vbNewLine
            Msg = Msg & "PLEASE copy the FE to to a local drive and try again. "
    
            MsgBox Msg
            Quit (acQuitSaveNone)
        Else
            Set d = CurrentDb
            'check to see if there is at least one linked table - linking to SQL Server Express
            Set r = d.OpenRecordset("select cnd_pk from company_name_def", dbOpenDynaset, dbSeeChanges)
    
            If IsNull(r.Fields(0)) Then
                DoCmd.OpenForm "openerror"
            Else
                DoCmd.OpenForm "startup"   'main form name
                DoCmd.Close acForm, Me.Name
            End If
        End If
    
    login_open_exit:
        On Error Resume Next
        r.Close
        Set r = Nothing
        Set d = Nothing
        Exit Sub
    
    login_open_error:
        Select Case Err.Number
            Case 3078, 3024, 3044    ' table not there
                MsgBox "The data files are not available.  Please locate the Back End Database now."
                btnSelectBE_Click
            Case 3622
                DoCmd.OpenForm "startup"
                DoCmd.Close acForm, Me.Name
                'Resume login_open_exit
            Case Else
                MsgBox Err.Number & ": " & Err.Description
                Resume login_open_exit
        End Select
    End Sub

Please reply to this thread with any new information or opinions.

Similar Threads

  1. Replies: 12
    Last Post: 09-04-2018, 04:48 PM
  2. Modifying Form Then Updating ACCDE File
    By Ranger7913 in forum Forms
    Replies: 2
    Last Post: 01-26-2015, 02:55 PM
  3. Automatically Update References
    By dandoescode in forum Programming
    Replies: 13
    Last Post: 06-28-2012, 10:14 AM
  4. Automatically updating dates
    By cinciphantom in forum Programming
    Replies: 0
    Last Post: 02-15-2011, 04:33 PM
  5. Automatically updating matrix
    By reuip in forum Access
    Replies: 2
    Last Post: 06-08-2010, 08:04 AM

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
Other Forums: Microsoft Office Forums