I am having a library problem. I we

[ProgrammingB52]

I am having a library problem. I went to tools->references and dont which libraries to use. It compiled and ran fine before, but all of a sudden it doesn't recognize ADODB.Recordset and CurrentProject.Connection

Public Sub removedashUPClist()
Dim cnn As Connection
Dim rst As ADODB.Recordset
Set cnn = CurrentProject.Connection
Set rst = New ADODB.Recordset
rst.Open "currentTbl" cnn, adOpenKeyset, adLockOptimistic
cnn.Close
End Sub

With Set rst = New ADODB.Recordset
I got "compile error: User-defined function not defined"
Then I changed the library, took out the DAO library.
Then I got runtime error "type mismatch" with the statement
Set cnn = CurrentProject.Connection. What library's do I need to be using, or what shouldn't I be using?

 

[CassandraR]

Hi:

For ADODB, one should use Microsoft ActiveX Data Objects 2.x Library, where x is 5 or later.

One error that was obvious is

rst.Open "currentTbl"  cnn, adOpenKeyset, adLockOptimistic

should have a comma before the cnn, like

rst.Open "currentTbl",  cnn, adOpenKeyset, adLockOptimistic

Cassie

 

[ProgrammingB52]

Well, I did use the comma for my module. I am using Microsoft ActiveX Data Objects (MultiDimensional 2.5)
and Microsoft ActiveX Data Objects 2.0. This code works, then when reopening it suddenly doesn't have the correct libraries.