Hi All,
I am looking to create a form that will open different database on a shared drive...but I keep getting this error:
"Microsoft Office Can't open because its missing or opened exclusivly by another user"
The code below works fine for the database on my computer
(C:\Documents and Settings\lcook11\Desktop\DB's_IN_Progress) but I need it to point to a folder on shared network.
Any suggestions?
Thanks
Larry
I am looking to create a form that will open different database on a shared drive...but I keep getting this error:
"Microsoft Office Can't open because its missing or opened exclusivly by another user"
The code below works fine for the database on my computer
(C:\Documents and Settings\lcook11\Desktop\DB's_IN_Progress) but I need it to point to a folder on shared network.
Code:
Private Sub cmdOpenTCImprovements_Click()
' Include the following in Declarations section of module.
Dim appAccess As Access.Application
Dim strDB As String
' Initialize string to database path.
Const strConPathToSamples = "P:\Transplant Connect"
strDB = strConPathToSamples & "TC_Improvements.mdb"
' Create new instance of Microsoft Access.
Set appAccess = _
CreateObject("Access.Application")
' Open database in Microsoft Access window.
appAccess.OpenCurrentDatabase strDB
' Open Orders form.
appAccess.DoCmd.OpenForm "frm_Main"
End Sub
Any suggestions?
Thanks
Larry