在工作中,我在access vba中编写了一些内容来自动创建邮件并将其发送出去。为了获得所有需要的信息,我需要访问我公司的服务器。 一切为我工作:编程的VBA,安装Oracle即时客户端12_1和odbc部分都在C:\Oracle\instantclient_12_1
(都32位),安装odbc_install.exe
并创建tnsnames.ora
-文件在同一目录中。Oracle即时客户端12_1 + odbc运行时错误
当我尝试为我的同事做同样的工作时,最终出现: Run-time Error '-2147467259 (80004005) [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified
。
我完全不知道为什么。试图安装64位驱动程序,它可以显然不工作:P试图改变连接字符串在VBA和tnsnames.ora文件...
我还没有创建一个用户dsn连接,我真的想要避免做,并不是真的有必要。
你有什么想法可以解决这个问题或我该如何解决这个问题?
。
。
下面是我在VBA中使用的连接字符串:
Set CMDB_cn = New ADODB.Connection Set CMDB_rst = New ADODB.Recordset Dim strConnect, str1 As String strConnect = "Driver={Oracle in instantclient_12_1};Dbq=blabla;Uid=user;Pwd=swordfish;" str1 = "select * From db.table WHERE Name = 'Mr. Nobody';" CMDB_cn.Open strConnect
和tnsnames.ora:
blabla=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=123.456.789.123)(PORT=1234)))(CONNECT_DATA=(SID=serverName)(SERVER=DEDICATED)))
不是您的问题的解决方案,但....您是否知道您可以直接从Oracle发送电子邮件(纯文本以及完整的HTML文档)? – FDavidov