Автоматическое заполнение логина/пароля при подключении к БД

RSS

U_M0KRH

Пользователь

Сообщений: 158 Регистрация: 20.10.2014

24.04.2015 17:03:09

Добрый день! Подскажите пожалуйста.
Есть макрос который тянет SQL запрос из БД Oracle:
Код следующий:

Код

 Dim conn As New ADODB.Connection
    
    conn.Provider = "OraOLEDB.Oracle"
    
    conn.Properties("Prompt" = adPromptAlways
  
    conn.CursorLocation = adUseClient
    conn.Open "Data Source=ххх;Password=ххххх;User ID=ххххх;"

Открывается окно с уже заполнеными данными логин, пароль, бд. Но нужно еще нажать кнопку "Ок". Собственно вопрос в том, что нужно написать чтобы дальше действия выполнялись автоматически, без дополнительного нажатия на кнопку в окне подключения.

B.Key

Пользователь

Сообщений: 633 Регистрация: 26.02.2014

24.04.2015 19:14:54

используйте другой провайдер

Код
Set cn = CreateObject("ADODB.Connection") cn.Open "Provider=MSDAORA.1;Data Source=**;Password=;User ID=****"

U_M0KRH Пользователь Сообщений: 158 Регистрация: 20.10.2014	#3 27.04.2015 09:25:26 Изменил провайдера, все тоже самое. Выходит окно с уже заполненными данными и нужно нажимать ОК в окне подключения...