Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

未发现数据源名称并且未指定默认驱动程序

chinasa  发表于:2018-02-23 08:35:31  
复制

请各位大师帮助我看看是什么问题,哪怕是怀疑也行,您来说我来测试,百度了很久,试了多种方法都不行。

 

1.在ACCESS中通过ODBC调取服务器ORACLE数据库表。

2.相同的程序在多台WIN7+ACCESS2007或者XP+ACCESS2007上都能正常运行。

3.现有一台电脑重新装了操作系统和软件,WIN7+OFFICE2010,运行出错,我对OFFICE上的ACCESS覆盖安装了2007版,但仍然出错,提示如下。

4.我在这台电脑上手工通过ODBC链接ORACLE表能够成功。

5.我尝试添加系统DSN、或者用户DSN和系统DSN都添加,但仍然不行(在DSN中TEST能成功,但用代码就出错)。

6.我在IIS里启用32位也不行。

 

错误提示:运行时错误  -2147467259(80004005)    未发现数据源名称并且未指定默认驱动程序

 

Dim ConnDB As New ADODB.Connection
Dim ConnStr As String

strDBName = "DDDD"
strUserID = "UUUU"
strPassword = "PPPP"

ConnStr = "DRIVER={Microsoft ODBC for Oracle};SERVER=" & strDBName & ";UID=" & strUserID & ";PWD=" & strPassword & ";"
ConnDB.CursorLocation = adUseServer
ConnDB.Open ConnStr  '在这里高亮,出错。

 

Top
chinasa 发表于:2018-02-23 10:36:27

最新测试情况:

1.我在正常的电脑上,删除DSN设置,能够正常读取ORACLE表,说明我是上述代码不需要设置DSN?

2.我对下面这句代码的Microsoft ODBC for Oracle进行修改,比如修改为Microsoft ODBC for XOracle,则可以重现有问题那台电脑的错误,难道问题在这句代码上?

 ConnStr = "DRIVER={Microsoft ODBC for Oracle};SERVER=" & strDBName & ";UID=" & strUserID & ";PWD=" & strPassword & ";"



chinasa 发表于:2018-06-01 08:34:19
急需结贴,哪位好心人帮我随便回复点什么,以便设置最佳答案,万分感谢!

chinasa 发表于:2019-10-16 14:30:21
急需结贴,哪位好心人帮我随便回复点什么,以便设置最佳答案,万分感谢!



chinasa 发表于:2019-10-24 13:42:42
急需结贴,哪位好心人帮我随便回复点什么,以便设置最佳答案,万分感谢!



总记录:4篇  页次:1/1 9 1 :