User-defined type not defined compile error (1 Viewer)

[Zedster]

I am returning to creating databases after a long absence. I am trying to re-use code from previous databases I have designed to save a time. Historically I have a function that checks that the access front end is able to connect to the SQL back end. I have copied this function across to the new database but I am getting a compile error "user-defined type not defined"

Dim cnn As ADODB.Connection
CheckSQLServerConnection = False

    Set cnn = New ADODB.Connection
    cnn.Open "Provider=SQLOLEDB;Server=localserver\databases;Database=Stores;Trusted_Connection=yes"

    If cnn.State = adStateOpen Then
        CheckSQLServerConnection = True
        cnn.Close
    End If

    Debug.Print CheckSQLServerConnection

The compiler highlights the third line above "Set cnn = New ADODB.Connection".

I am feeling quite a noob as I can't remember what causes this and how to get around it I am assuming it is associated with ADODB but I thought that was a standard Access term.

Any help appreciated.

 

[MajP]

See discussion on references you need
Post in thread 'Between Dates On Keyword Search' https://www.access-programmers.co.u...n-dates-on-keyword-search.328844/post-1890875

 

[moke123]

Did you set a reference to ADO?

 

[Zedster]

how do I do that? I suspected it may be down to references, so I got one of me previous database that ran, then from menu went tools > references and made sure all the same boxes were ticked. but that made no difference. The ones I have are:

 

[MajP]

The reference in question is Microsoft Active X Data Objects. Although, I have never seen Multi-dimensional before. I would unclick that one and search to another version of that reference.

 

[Zedster]

OK, got it, I had selected the wrong ActiveX data object (there were quite a lot).

This works:

Thanks for all the help.