ADODB doesn't exist in Access 2013 project, how do I add a reference to it

John S picture John S · Apr 3, 2014 · Viewed 27.5k times · Source

I am trying to rebuild an Access adp project in Access 2013 as and mdb. The tables are all linked tables in both version so that is not an issue.

I have imported the forms from the old project so the form layouts and code is all there.

Where I run into problems is when trying to execute the following code:

Dim cmd As New ADODB.Connection, RS As New ADODB.Recordset
cmd.ActiveConnection = connectionString
Debug.Print connectionString
cmd.ActiveConnection.CursorLocation = adUseClient
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "sp_Myproc"
cmd.Parameters.Refresh
cmd(1) = Me.my_id
Set RS = cmd.Execute

'Should be checking if record set is open and explicitly close it. JWS
If RS.State = 1 Then
RS.Close
Set RS = Nothing
End If

cmd.ActiveConnection.Close

I am not able to declare the cmd and RS variables because ADODB doesn't seem to exist. How do I reference this in Access or what is the correct way to accomplish this?

Answer

Barranka picture Barranka · Apr 3, 2014

As I wrote in my comment, you need to check that the ADODB reference is enabled:

  1. On the VBA Editor, clic on the "Tools" menu, and then clic on "References..."
  2. Verify thet the checkmark for "Microsoft ActiveX Data Objects x.x Library" is activated; if it is not, activate it.

Further reference: Using ADO with Microsoft VB & VBA