Проблема: файл Excel с поддержкой макросов, который моя компания использовала в течение некоторого времени, внезапно перестал работать, когда наши компьютеры были обновлены до Windows 10. Когда я пошел исследовать и отладить, я обнаружил, что соединение ADODB вызывало проблему.
То, что я пробовал: я проверил, чтобы соединение DSN (которое было в существующем VBA) все еще активно, используя SQL Developer и получая успешное соединение. Я возился с кодом и пробовал разные версии, основанные на том, что я исследую в сети, но безрезультатно.
Текущий код:
Dim CN As New ADODB.Connection
Sub connectToDatabase()
If CN.State <> 1 Then
CN.Open "DSN=[SERVICE NAME].db.[COMPANY NAME].com;_
uid=[USERNAME];_
pwd=[PASSWORD]"
End If
End Sub
Что я ожидал и чтофактически происходит: при запуске отладки я ожидал, что курсор продолжит выполнение вызова CN.Open, но это не так. Происходит следующее заполнение следующего сообщения:
Ошибка времени выполнения '-2147467259 (80004005)': [Microsoft] [Диспетчер драйверов ODBC] Не найдено имя источника данных и не указан драйвер по умолчанию.
Есть мысли?