ACC2000: Jet OLE DB Provider Requires Jet 4.0 System Database
ID: Q243466
|
The information in this article applies to:
Advanced: Requires expert coding, interoperability, and multiuser skills.
This article applies only to a Microsoft Access database (.mdb).
SYMPTOMS
When you try to use a Microsoft Jet 3.x workgroup information file (system database) with the Microsoft Jet 4.0 OLE DB provider, you may receive the following error message:
The operation requested by the application is not supported by the provider.
CAUSE
The OLE DB APIs make calls that are not supported in the Jet 3.x I-ISAM.
RESOLUTION
Re-create your users and groups in Microsoft Access 2000 to get a system database in the Jet 4.0 format.
MORE INFORMATION
Steps to Reproduce Behavior
-
Create the following folder in the root of drive C:
C:\Test
-
Install Access 97.
-
Copy the sample database Northwind.mdb to the C:\Test folder.
-
In Windows Explorer, browse to the following folder:
Windows\System
NOTE: This is the path to the System.mdw file that is installed by Access 97. On a computer running Windows NT, this file is located in the Winnt\System32 folder.
-
Copy the System.mdw file to the C:\Test folder.
-
Install Access 2000 on the same computer. Note that by default the System.mdw file for Access 2000 is installed in the Program Files\Microsoft Office\Office folder.
-
In Access 2000, create a new database.
- Create a new module.
- On the Tools menu, click References, and make sure the following references are selected:
Microsoft ActiveX Data Objects 2.1 Library
Microsoft ADO Ext. 2.1 for DDL and Security
- Type the following function in the module:
Function TestWorkgroup()
Dim conn as ADODB.Connection
Dim cat as ADOX.Catalog
Set conn = New ADODB.Connection
conn.Provider = "Microsoft.Jet.OLEDB.4.0"
conn.Properties("Jet OLEDB:System database") = "C:\Test\System.mdw"
conn.ConnectionString = "Data Source=c:\test\Northwind.mdb;" _
& "User Id=Admin;Password=password"
conn.Open
Set cat = New ADOX.Catalog
cat.ActiveConnection = conn
For Each grp In cat.Users(m_sUserID).Groups '<== error occurs here
Debug.Print cat.Users(0).name
Next
End Function
-
In the Immediate window, type the following function name:
TestWorkgroup
Note that you receive the following error message:
The operation requested by the application is not supported by the provider.
Additional query words:
prb directory
Keywords : kbdta
Version : WINDOWS:2000
Platform : WINDOWS
Issue type : kbprb