方法'Connection'作用于对象'_CurrentProject'时失败

老鬼

在ACCESS2007中，运行以下两句代码，提示“方法'Connection'作用于对象'_CurrentProject'时失败”，可是在同一台电脑上用ACCESS2010中运行却正常。为什么？网上说可能是ADO没注册，可是我注册了还是一样的错误提示。
Public cnLcl As Object
Set cnLcl = Application.CurrentProject.Connection

夜归人

你的语句没有任何错误，但建议你不要在同一电脑同时安装多个office版本，

tmtony

直接
Set cnLcl = CurrentProject.Connection
试试是否可以
如果不行，试试 msgbox currentproject.path  
msgbox  CurrentProject.Connection.connectionstring
看看

老鬼

tmtony 发表于 2016-5-27 12:38
直接
Set cnLcl = CurrentProject.Connection
试试是否可以

去掉application结果一样；currentproject.path没问题，不会出错；
currentproject.connection.connectionstring错误的提示跟currentproject.connection一样。

ganlinlao

应该是跟同时安装多个access版本有关。
你找个工具重新注册 access2007的msaccess.olb。
再试试看，说不定能解决07版本问题。

tmtony

没有环境，很难判断错误问题，可能是 冬瓜说的原因
但也可能是引用的问题。
有可能你电脑有安装了其它Access版本，或者 曾经安装过其它版本，但卸载了
解决办法，是打开VBE窗口，在引用中看看里面引用的 Access的版本是否正确，正确2003 版本是 11， 2010 是14 ，2007 应该是介于2者之间。如果这个引用是错误的，你就需要重装或修复一个Access安装即可。

老鬼

tmtony 发表于 2016-5-28 09:43
没有环境，很难判断错误问题，可能是 冬瓜说的原因
但也可能是引用的问题。
有可能你电脑有安装了其它Acc ...

我查了引用，是12，应该没错。我装了四个版本，03，07，10，13，对应的引用在切换版本后ACCESS会自动更正（11，12，14，15）。或许真的就是安装多版本导致的，我再试试大伙的建议。谢谢大家！

jsxfygq

老鬼 发表于 2016-5-29 21:24
我查了引用，是12，应该没错。我装了四个版本，03，07，10，13，对应的引用在切换版本后ACCESS会自动更正 ...

就是因为装了几个版本的刘原因，我遇到过这个问题，把他们删除，装一个版本就可以了