ADODB не существует в проекте Access 2013, как мне добавить ссылку на него

Я пытаюсь перестроить проект Access ADP в Access 2013, как и MDB. Все таблицы являются связанными таблицами в обеих версиях, так что это не проблема.

Я импортировал формы из старого проекта, так что макеты форм и код находятся там.

Я сталкиваюсь с проблемами при попытке выполнить следующий код:

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

Я не могу объявить переменные cmd и RS, потому что ADODB, кажется, не существует. Как мне сослаться на это в Access или как правильно это сделать?

1 ответ

Решение

Как я уже писал в своем комментарии, вам нужно убедиться, что ссылка ADODB включена:

  1. В редакторе VBA щелкните меню "Инструменты", а затем нажмите "Ссылки..."
  2. Убедитесь, что флажок "Microsoft ActiveX Data Objects xx Library" активирован; если это не так, активируйте его.

Дополнительная справка: Использование ADO с Microsoft VB & VBA

Другие вопросы по тегам