Solved

Error with DAO.DBEngine.36

Posted on 2006-07-20
3
870 Views
Last Modified: 2012-05-05
URGENT!!  Here is my code in MS Access 2002 SP3 (Win XP Pro SP2 platform):

-------
Function ViewLink()

    Dim oDAO
    Set oDAO = CreateObject("DAO.DBEngine.36")
   
    Dim db As DAO.database
    Dim tbl As TableDef
   
    Set db = CurrentDb
    On Error Resume Next
    For Each tbl In db.TableDefs
        Debug.Print tbl.Connect
    Next tbl


End Function
-------

I am trying to set reference to DAO 3.6 via code in order for the rest of my module to work, but I get a "Compile Error / User-defined type not defined".  I know I'm missing something simple here, but I can't quite put my finger on it.  Help!

Thanks,
Mike
0
Comment
Question by:CCIG2006
3 Comments
 
LVL 65

Assisted Solution

by:Jim Horn
Jim Horn earned 250 total points
ID: 17151505
What's the purpose of the oDAO Dim/Set?  Remove them, and try running your code again.
0
 
LVL 76

Expert Comment

by:GrahamSkan
ID: 17152005
I think that you will either have to set the reference to DAO in the IDE or use late binding.
0
 
LVL 4

Accepted Solution

by:
JRCSystems earned 250 total points
ID: 17159645
Here are your choices:

1. Either manually make a reference to DAO 3.6 in VB's PROJECT/REFERENCES,
    find and check [x] Microsoft DAO 3.6 Object Library.

or

2. Change the Type Name of all of your specific DAO object variables to "Object"
    If you don't have a reference to DAO in your VB project, you can't use early binding.

3. Unsure looking at your code snippet what "CurrentDB" is.
    Make sure its properly defined.
0

Featured Post

Better Security Awareness With Threat Intelligence

See how one of the leading financial services organizations uses Recorded Future as part of a holistic threat intelligence program to promote security awareness and proactively and efficiently identify threats.

Join & Write a Comment

Introduction While answering a recent question about filtering a custom class collection, I realized that this could be accomplished with very little code by using the ScriptControl (SC) library.  This article will introduce you to the SC library a…
Article by: Martin
Here are a few simple, working, games that you can use as-is or as the basis for your own games. Tic-Tac-Toe This is one of the simplest of all games.   The game allows for a choice of who goes first and keeps track of the number of wins for…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

747 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

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now