0

我有下面的 excel 宏来连接到 oracle 数据库。但是,执行代码时,我收到错误消息 -

“运行时错误 '-2147467259 (80004005)': ORA-12541:TNS:no listener”

请帮助我解决此错误消息。

我的电脑上安装了“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"

结束子

4

1 回答 1

0

使用正确的连接字符串解决了这个问题。

连接字符串:Driver={Microsoft ODBC for Oracle};服务器=(描述=(地址=(协议=TCP)(主机=199.199.199.199)(端口=1523))(连接数据=(SID=dbName)));Uid=我的用户名;密码=我的密码;

不需要 TSN 或 DSN。

于 2018-09-11T01:48:15.917 回答