Подключение VBA к SQL Server 2017 - ошибка (невозможно завершить процесс входа в систему из-за задержки при открытии подключения к серверу)

Question

МЫ используем электронную таблицу для сбора и распределения различных данных в листах для использования компанией.

Использовали MS Excel 2013 и более раннюю версию MS SQL Server. Который отлично работал без каких-либо ошибок, вот код из нашего файла VBA:

Dim con As ADODB.Connection
Dim cmd As ADODB.Command 
Dim rs As ADODB.Recordset 

Set con = New ADODB.Connection 
Set cmd = New ADODB.Command 
Set rs = New ADODB.Recordset 

MyConStr = "Provider=SQLOLEDB;Data Source=sqlserver\SQL;Initial Catalog=MYDB;user id=sa;password=Mon87653day9856; 
con.Open MyConStr 

Теперь мы обновились до SQL Server 2017 и получили ошибку. Невозможно завершить процесс входа в систему из-за задержки открытия соединения с сервером

Я пытался просмотреть каналы и изменить порядок, но все равно получаю ошибку.

Я скачал новый драйвер MSOLEDBSQL и все еще получаю сообщение об ошибке.

Я попробовал настройки надежного соединения и тайм-аута, но все еще получаю ошибку.

У кого-нибудь есть идеи?

Answer 1

Отредактированный

Я не уверен, что это было ошибкой в ​​вашем сообщении или в исходном коде, но вы пропускаете кавычки в конце строки подключения ( Я бы добавил это в комментарии, но не у него достаточно высокая репутация ).

Кроме того, в прошлом мне приходилось указывать IP-адрес сервера, чтобы установить соединение с сервером. Может стоит попробовать.