Отсутствующая или неработающая ссылка не является конкретно ошибкой в вашем коде VBA, это ошибка, указывающая на отсутствие библиотеки (или в данном случае элемента управления ActiveX), которую вы используете в своем проекте.
Это означает, что файл элемента управления ActiveX MSADODC.OCX не находится в расположении, которое Access ожидает, и не может разрешить это местоположение путем регистрации этого элемента управления в реестре Windows.
Вы можете просмотреть свои ссылки и путь, по которому Access считает, что файл MSADODC.OCX должен быть следующим:
- Откройте редактор VBA в вашем файле доступа
- Нажмите в меню
Tools и выберите References
Вы должны получить диалог, подобный следующему:
Обратите внимание на текст MISSING: рядом с несколькими из перечисленных ссылок. Это означает, что Access не может разрешить эти библиотеки. При нажатии на ссылку MISSING в нижнем разделе отображается путь, по которому Access ожидает, что файл будет расположен.
Элемент управления MSADODC.OCX ActiveX должен отображаться в диалоговом окне «Ссылки».
Для разрешения ссылки MISSING вам, вероятно, потребуется переустановить VB6 или заново зарегистрировать файл OCX, если вы сможете найти его на жестком диске.
Если вы найдете его, вы можете перерегистрировать его (при условии наличия всех зависимостей DLL для OCX) с помощью Regsvr32.exe (Microsoft - Как использовать инструмент Regsvr32 )
Обычно откройте командную строку (с правами администратора), перейдите в папку, содержащую файл OCX, и введите:
regsvr32 msadodc.ocx
Надеюсь, это поможет.
Обновление 1 Я забыл упомянуть, что, возможно, вам не нужна ссылка на MSADODC.OCX в вашем проекте, но вам придется это определить, удалив ее и скомпилировав код (чтобы увидеть, если какие-либо ошибки найдены), и проверяя все ваши формы, чтобы убедиться, что контроль не содержится на них.
В Microsoft Access, если вы добавляете элемент ActiveX к форме, Access добавляет ссылку на этот элемент управления. Однако если вы затем удалите этот элемент управления ActiveX из своей формы, Access не удалит ссылку. Если вы больше не используете элемент управления, вы должны удалить ссылку самостоятельно, сняв флажок в диалоговом окне, показанном выше.