Макрос Excel для подключения к базе данных Oracle - PullRequest
Новая
       81

Макрос Excel для подключения к базе данных Oracle

0 голосов
/ 10 сентября 2018

У меня ниже макрос Excel для подключения к базе данных Oracle. Но, выполняя код, я получаю сообщение об ошибке -

«Ошибка времени выполнения -2147467259 (80004005)»: ORA-12541: TNS: нет прослушивателя »

Пожалуйста, помогите мне разрешить это сообщение об ошибке.

На моем компьютере установлена ​​программа Oracle SQL Developer 3.2. 

Sub connectToCISDB()

Dim dbCon As New ADODB.Connection
Dim recordSet As New ADODB.recordSet
Dim strQuery, strCon As String

strQuery = "select * from SAPSR3.eanlh;"

Set dbCon = New ADODB.Connection      
dbCon.Open "Provider=OraOLEDB.Oracle;User ID=xautotext;Password=F7_kxxxxZS;Data Source=ouxxpdxx1"

End Sub

1 Ответ

0 голосов
/ 11 сентября 2018

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

Строка подключения : Драйвер = {Microsoft ODBC для Oracle}; Сервер = (ОПИСАНИЕ = (АДРЕС = (ПРОТОКОЛ = TCP) (HOST = 199.199.199.199) (PORT = тысяча пятьсот двадцать три)) (CONNECT_DATA = (SID = DBNAME))); Uid = MyUserName; PWD = MyPassword;

TSN и DSN не требуются.

...