If you are deploying a pair of dbs with the code similar to below that toggles back and forth to the dbs, how would you set the strPath to take into account the dbs will be physically located on a network file server?
Option Explicit
Option Compare Database
Public appAccess As Access.Application
Public Sub OpenADatabase()
Dim strPath as string
set strPath = "C:\REVISION\dbBackend.mdb"
Set appAccess = CreateObject("Access.Application")
With appAccess
.OpenCurrentDatabase strPath
.Visible = True
End With
End Sub
Option Explicit
Option Compare Database
Public appAccess As Access.Application
Public Sub OpenADatabase()
Dim strPath as string
set strPath = "C:\REVISION\dbBackend.mdb"
Set appAccess = CreateObject("Access.Application")
With appAccess
.OpenCurrentDatabase strPath
.Visible = True
End With
End Sub