Are you not just setting the response from the file picker to the form field?

Did you watch
Updates
Keep Images in Folder Under Database, Use Relative Path: https://599cd.com/ImagesSubfolder

A: Yes, I am setting the response from the file picker to the form field, and B: Yes, I have studied that video.   The key point is to store the image location in the database without the portion of the path up to the folder the database is in (CurrentProject.Path).  The query strips the leading portion of the image path (CurrentProject.Path) so the image location becomes relative to the folder the database (and image folder) are stored in when moved.  

I want to

1) Browse and select image, returning image path to form.  - Yes, can do that

2) Strip off the leading portion of the path - the CurrentProject.Path -  and store that in the database -  Can do that with update query

3) When I want to display the picture, put the CurrentProject.Path back on the image path - Yes, can do that

I just don't know how to incorporate the query into the process.   Thanks

RE. my 'Step 2' above, I followed the video Store Images Relative to DB to Prevent Broken Links: https://599cd.com/blog/display-article.asp?ID=3108

It appears that I can do both steps 1 and 2 in the VBA code for the Browse button and eliminate the query altogether.  This seems to work -

Details

Public Function PickFile() As String
        Dim FO As Object
        Dim x As Variant
        Set FO = Application.FileDialog(3)
        
        If FO.Show Then
            x = FO.SelectedItems(1)
            PickFile = Replace(x, CurrentProject.Path, "")
        End If
End Function
Copy

Private Sub BtnBrowse_Click()
    Emp_Picture = PickFile()
End Sub

Corrected my code to also prevent overwriting existing value in table if user cancels browse -

Details

Public Function PickFile() As String
        Dim FO As Object
        Dim x As Variant
        Set FO = Application.FileDialog(3)
        
        If FO.Show Then
            x = FO.SelectedItems(1)
            PickFile = Replace(x, CurrentProject.Path, "")
        End If
End Function
Copy

Details

Private Sub BtnBrowse_Click()
    Dim test As Variant
    test = PickFile()
    
    If test <> "" Then
        Emp_Picture = test
    End If
End Sub
Copy

Final update, I think.   The point of making the file references relative is to allow portability of the database.  The image files need to be copied to the image folder in the path of the database.   This code will copy a local file, found through the browse function, to the images folder in the database folder.  Whether the image comes from the images folder or elsewhere on the local machine, its name will be reduced to the relative reference.

Details

Public Function PickFile() As String
  
        Dim FO As Object
        Dim FSO As Object
        Dim sFilename As String
        Dim x As Variant
        
        Set FSO = VBA.CreateObject("Scripting.FileSystemObject")
        Set FO = Application.FileDialog(3)    
        If FO.Show Then
            x = FO.SelectedItems(1)            
            sFilename = Mid$(x, InStrRev(x, "\") + 1)            
            If InStr(x, [CurrentProject].[Path]) = 0 Then          
                Call FSO.CopyFile(x, [CurrentProject].[Path] & "\images\", True)
                PickFile = "\images\" & [sFilename]              
            Else          
                PickFile = Replace(x, CurrentProject.Path, "")                
            End If                      
        End If        

End Function
Copy

Details

Private Sub BrowseBtn_Click()

    Dim test As Variant
    test = PickFile()    
    If test <> "" Then
        Org_Image_Link = test
    End If
  
End Sub
Copy