Run Time error 13

Posted on 2009-07-06
Medium Priority
Last Modified: 2012-05-07
I see quite a few posts out there asking about "Run Time error 13", but I haven't found anything helpful so far.

Here is my scenario: My predecessor was running some VB code using Office 2003 (Microsoft Access) on a Windows 2000 server. Now, we just upgraded to Server 2008 and I am using Office 2007. When I try to run the following code, I get a "Run Time error 13 Type mismatch" error. I haven't been able to find a solution to my problem yet.

Please refer to the attached code. The OpenRecordset for tblNCLOutput works just fine. But, when I try to do a OpenRecordset on tblIndividualsAndDegrees, I get a Run Rime error 13. What gives?

And I can confirm that the table exists in the Access database.
Dim dbCur As Database
    Dim rstNCLIndividualsAndDegrees As Recordset
    Dim rstNCL As Recordset
    Set dbCur = CurrentDb()
    Set rstNCLOutputTable = dbCur.OpenRecordset("tblNCLOutput", dbOpenDynaset)
    Set rstNCLIndividualsAndDegrees = dbCur.OpenRecordset("tblIndividualsAndDegrees", dbReadOnly)

Open in new window

Question by:IUAATech
  • 2
LVL 143

Accepted Solution

Guy Hengel [angelIII / a3] earned 2000 total points
ID: 24789821
Dim dbCur As Database
    Dim rstNCLIndividualsAndDegrees As Recordset
    Dim rstNCL As Recordset

Dim dbCur As DAO.Database
    Dim rstNCLIndividualsAndDegrees As DAO.Recordset
    Dim rstNCL As DAO.Recordset
and see if that helps

Author Comment

ID: 24789904
Thanks. You are a life saver.

It looks like I will need to update the code throughout the app and append "DAO."
LVL 143

Expert Comment

by:Guy Hengel [angelIII / a3]
ID: 24789918
to explain the issue:
both ADO and DAO have a recordset class.
if both are active in the project references, vb will silently pick 1 from them (without warning).

so, good practice is to always prefix your classes from project they are coming from.

glad I could help

Featured Post

The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
As a person who answers a lot of questions, I often see code that could be simplified, made easier to read, and perhaps most importantly made easier to maintain if the code was modified to use the Select Case statement. This article explains how to…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

607 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question