FIX: "Method 'Recordset' of object 'IAdodc' Failed" Error Message with ADO Data Control

• The Microsoft Jet OLE DB Provider is being used.
• The ADO Recordset uses the adCmdTableDirect command type.
• The ADO Recordset uses the adUseServer cursor location.

• To resolve this problem, obtain the latest service pack for Windows 2000. For additional information, click the following article number to view the article in the Microsoft Knowledge Base:
  260910 How to Obtain the Latest Windows 2000 Service Pack
• To resolve this problem, obtain the latest service pack for Microsoft Data Access Components 2.5. For additional information, click the following article number to view the article in the Microsoft Knowledge Base:
  293312 INFO: How to Obtain the Latest MDAC 2.5 Service Pack

   Date         Version       Size      File name     Platform
   -----------------------------------------------------------
   09/08/2000   2.51.5708.0   487,696   Msado15.dll   x86 

• Set the CursorLocation property of the Recordset object to adUseClient.
  
  -or-
  
  
• Use any command type other than adCmdTableDirect.

Steps to Reproduce Behavior

1. Create a new Standard EXE project in Microsoft Visual Basic 6.0.
2. Insert an instance of the Microsoft ADO Data Control 6.0.
3. Add a command button named Command1, and insert the following code into the Click event handler:

   Private Sub Command1_Click()
   Dim conn As ADODB.Connection
   Dim rs As ADODB.Recordset
   
       Set conn = New Connection
       ' Point this to NorthWind.mdb sample database.
       conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                 "Data Source=NorthWind.mdb"
       Set rs = New Recordset
       rs.CursorLocation = adUseServer
       Set rs.ActiveConnection = conn
       rs.Properties("IRowsetIdentity").Value = True
       rs.Open "Customers", , adOpenKeyset, adLockOptimistic, adCmdTableDirect
       Set Adodc1.Recordset = rs
   
   End Sub