What is the correct method for referencing the linked table?
Below is code that worked prior to splitting the database.
I split the database and got RunTime error 3219, "Invalid Operation".
Dim mydb As Database, Mytable As Recordset, MySnap As Recordset
Set mydb = DBEngine.Workspaces(0).Databases(0)
Set MySnap = mydb.OpenRecordset("Leave Bank Transaction Log", dbOpenSnapshot)
Set Mytable = mydb.OpenRecordset("APTRES", DB_OPEN_TABLE) ' Open table.
Program is bombing on the following line:
Set Mytable = mydb.OpenRecordset("APTRES", DB_OPEN_TABLE) ' Open table.
Below is code that worked prior to splitting the database.
I split the database and got RunTime error 3219, "Invalid Operation".
Dim mydb As Database, Mytable As Recordset, MySnap As Recordset
Set mydb = DBEngine.Workspaces(0).Databases(0)
Set MySnap = mydb.OpenRecordset("Leave Bank Transaction Log", dbOpenSnapshot)
Set Mytable = mydb.OpenRecordset("APTRES", DB_OPEN_TABLE) ' Open table.
Program is bombing on the following line:
Set Mytable = mydb.OpenRecordset("APTRES", DB_OPEN_TABLE) ' Open table.