ACC2000: Cannot Perform OpenTable Method on Linked/Attached Table
ID: Q208379
|
The information in this article applies to:
Moderate: Requires basic macro, coding, and interoperability skills.
This article applies only to a Microsoft Access database (.mdb).
SYMPTOMS
If you try to open a recordset on a linked table by using the dbOpenTable constant, you may receive the following error message:
Run-time error '3219':
Invalid Operation.
RESOLUTION
In Microsoft Access, a linked table must be opened as the Recordset object. The following code example assumes that you are linked to the Customers table in the sample database Northwind.mdb, which resides in the same folder as the database containing this code. The code opens the Northwind.mdb file, which actually contains the Customers table. The code then creates a recordset based on the Customers table.
The sample code in this article uses Microsoft Data Access
Objects. For this code to run properly, you need to reference
the Microsoft DAO 3.6 Object Library.
Public Function testLink()
Dim myDb As DAO.DATABASE, rstCustomers As DAO.Recordset
' Open the Northwind.mdb database.
Set myDb = DBEngine.Workspaces(0).OpenDatabase("Northwind.mdb")
' Create the recordset.
Set rstCustomers = myDb.OpenRecordset("Customers", dbOpenDynaset)
End Function
MORE INFORMATION
Steps to Reproduce Behavior
- Create a new, blank database in the same folder as the sample database Northwind.mdb.
- On the File menu, point to Get External Data, and then click Link Tables.
- In the Link dialog box, click Northwind.mdb, and then click Link.
- In the Link Tables dialog box, click the Customers table, and then click OK.
- Create a module and type the following line in the Declarations section if it is not already there:
Option Explicit
- Type the following procedure:
Function Test()
Dim db as DAO.Database
Dim mySet as DAO.Recordset
Set db = CurrentDB()
' Create the recordset based on the Customers table.
Set mySet = db.OpenRecordset("Customers", dbOpenTable)
End function
- To test this function, type the following line in the Immediate window, and then press ENTER:
? Test()
Note that you receive the error message mentioned in the "Symptoms"
section.
REFERENCES
For more information about the OpenRecordset method, in the Visual Basic Editor, click
Microsoft Visual Basic Help on the Help menu, type "OpenRecordset" in
the Office Assistant or the Answer Wizard, and then click Search to
view the topic.
Additional query words:
prb
Keywords : kberrmsg kbprg kbdta AccCon PgmObj KbVBA
Version : WINDOWS:2000
Platform : WINDOWS
Issue type : kbprb