PRB: Error 13 Type Mismatch Error on DAO OpenRecordset Method

 Last reviewed: March 4, 1998
Article ID: Q181542
The information in this article applies to:
  • Microsoft Visual Basic Enterprise Edition for Windows, version 5.0

SYMPTOMS

If you dimension an object as a Recordset and then set that object to databaseobject.OpenRecordset(source), you may get the following error message: 

   Run time error '13': Type mismatch

CAUSE

If your project contains references to both the Data Access Objects (DAO) library and the ActiveX Data Objects (ADO) library, you may see multiple Recordset entries in the list box when you dimension the Recordset object. This error occurs when you list the ADO library with a higher priority than the DAO library in the References dialog box, regardless of which Recordset entry you select from the list box.

RESOLUTION

If you need only the DAO Recordset object, make sure that the reference for the DAO object library has a higher priority in the References dialog box, or clear the reference to Microsoft ActiveX Data Objects.

If you need to reference and use both DAO and ADO Recordset objects, dimension the objects explicitly as follows: 

   DIM adoRS As ADODB.Recordset
   DIM daoRS As DAO.Recordset

MORE INFORMATION

Steps to Reproduce Behavior

  1. On the Project menu, point to References.

  2. In the References dialog box, set references to both the Microsoft Data Access Objects 3.5 library and the Microsoft ActiveX Data Objects 1.5 library.

  3. Make sure that the ADO library appears in the list above the DAO library.

  4. Place the following code in the General Declarations section of your project: 

          DIM dbs AS Database
      DIM rs AS Recordset  ' When you press the spacebar after "AS," the

                               ' list box includes multiple Recordset entries.
                           ' Pick any Recordset item, or type "Recordset."


  5. Place this code in the Form_Load procedure:

    

          SET dbs=OpenDatabase(dbname)
      SET rs=dbs.OpenRecordset(source)  ' The error occurs when this line

                                            ' of code executes.

    

	    
	

	















	






Additional query words: OpenRecordset DAO mismatch

Keywords          : vb5all VBKBDAO VBKBRecordset kberrmsg

Version           : win95:5.0;winnt:5.0

Platform          : Win95 winnt

Issue type        : kbprb








THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS
PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND.  MICROSOFT DISCLAIMS
ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES
OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  IN NO
EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR
ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL,
CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF
MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGES.  SOME STATES DO NOT ALLOW THE EXCLUSION
OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES
SO THE FOREGOING LIMITATION MAY NOT APPLY.






	
	Last reviewed:  March 4, 1998
	

	© 1998 Microsoft Corporation. All rights reserved. Terms of Use.