PRB: Error: "Not capable" When Opening a Record Object off a Recordset

• Microsoft Data Access Components version 2.5
• ActiveX Data Objects (ADO), version 2.5

SYMPTOMS

When you attempt to open an ADO Record object using an ADO recordset, the following error appears:

Run-time error '3251':
Object or provider is not capable of performing requested operation.

CAUSE

The underlying OLE DB provider does not support the ADO record object.

STATUS

This behavior is by design.

MORE INFORMATION

The ADO documentation states that an ADO record can represent a row in a Recordset. However, the underlying OLE DB provider must support the ADO Record object. For example, the Microsoft OLE DB Provider for Internet Publishing supports the ADO Record object.

Steps to Reproduce Behavior

1. In Visual Basic, create a new Standard EXE project.
   Form1 is created by default.



2. Add a two Command buttons to Form1.
   Command1 and Command2 are created by default.



3. From the Project menu, select References. In the References dialog box select the Microsoft ActiveX Data Objects Library.



4. Paste the following code into the "General Declarations" section of Form1's Code Window:

   
      Private Sub Command1_Click()
       
          Dim rs As ADODB.Recordset
          Dim rec As ADODB.Record
       
          Set rs = New ADODB.Recordset
          Set rec = New ADODB.Record
       
          rs.Open "", "URL=http://localhost/", , , adCmdTableDirect
          rec.Open rs
       
          MsgBox rec(0).Value
       
          rec.Close
          Set rec = Nothing
          rs.Close
          Set rs = Nothing
       
      End Sub    
       
      Private Sub Command2_Click()
      
          Dim rs As ADODB.Recordset
          Dim rec As ADODB.Record
       
          Set rs = New ADODB.Recordset
          Set rec = New ADODB.Record
   
          rs.Open "Employees", "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                  "Data Source=Nwind.mdb", _
                   adOpenStatic, adLockReadOnly, adCmdTableDirect
       
          'The error occurs on the following line:
          rec.Open rs
       
          rec.Close
          Set rec = Nothing
          rs.Close
          Set rs = Nothing
       
      End Sub 




5. Modify the Connection strings to point to your server and database.



6. Click F5 to start your Visual Basic program.
   Click Command1. No error occurs when using the Internet Publishing Provider.
   Click Command2. Note the error when using the Microsoft Jet OLE DB provider.

REFERENCES

You may find complete documentation on the Microsoft ActiveX Data Objects at
Microsoft ActiveX Data Objects

Additional query words:

Keywords : kbADO kbDatabase kbOLEDB kbProvider kbGrpVBDB kbGrpMDAC kbDSupport kbMDAC250
Version : WINDOWS:2.5
Platform : WINDOWS
Issue type : kbprb