MS Office 2010 - встроенный Visual Basic. MS SQL Server 2008 (r2), удаленный.
Создаю вручную файл подключения с раширением udl. Проверка подключения проходит успешно.
Потом, чтобы быть уверенной, что строки идентичны, строку подключения из этого файла копирую в строку подключения ADO в VBA:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
Private Sub OpenConnection()
Dim cn As ADODB.Connection
Dim strSQL As String
Set cn = New OLEDBConnection
On Error GoTo CnErrorHandler
cn.Open "Provider=SQLOLEDB.1;Password=password;Persist Security Info=True;User ID=user_login;Initial Catalog=db_name;" & _
"Data Source=server_name;"
Exit Sub
CnErrorHandler:
For Each ADOErr In cn.Errors
Debug.Print ADOErr.Description
Next
end Sub
Получаю ошибку
"Logon failed for login 'user_login' due to trigger execution" . Такая же ошибка возвращается и при попытке подключения из Excel через мастер подключений, с теми же параметрами, что и для udl-файла.
В то же время в Delphi, используя TAdoConnection подключаюсь и выполняю запросы к серверу без проблем с той же строкой подключения.
Стоит задача настроить подлючение именно из Excel или Access. Может ли на сервере быть тригггер на коннект из конкретных приложений или это бред?
Подскажите пожалуйста, в чем здесь может быть дело?
