Excel用ADO读取Excel，为什么不需要引用ADO的呢？

eyeshen

请看以下这段代码，究竟是OLE还是ADO，怎么不引用ADO也可以运行？
另外请问，OLE是不是不需要引用的，是否是 OLE automation，这个是每个新建的Excel文件都自动引用了的？？？谢谢各位高手。

Set conn1 = CreateObject("adodb.connection")         '（1）设置对象

conn1.Open "provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;data source=" & Sheets("设置").Cells(3, 1).Value & "\abc.xls"
On Error Resume Next
Sql1 = "select *  from [sheet1$A:A]"
Sheets("数据").Cells(2, 19).CopyFromRecordset conn1.Execute(Sql1)
conn1.Close       '关闭链接
Set conn1 = Nothing  '释放对象变量

johnny05

CreateObject，顾名思义就是创建一个对象，当然就不需要再引用

jyhxr

猜一下,大概是已经嵌入了此功能的缘故吧

小fisher

Createobject是通过在注册表中搜索Createobject提供的参数（也就是组件的名称）在注册表的HKEY_CLASSES_ROOT\中搜索到ADODB.Connection子项，然后通过它下面的CLSID（值为{00000514-0000-0010-8000-00AA006D2EA4}），然后到HKEY_CLASSES_ROOT\CLSID\下找到对应的项\{00000514-0000-0010-8000-00AA006D2EA4}，在它下面有一个\InprocServer32，它的默认值就是ADODB.Connection对应的磁盘文件C:\Program Files\Common Files\system\ado\msado15.dll，这样的方式依然是引用了ADODB的类库（如果注册表中没有相应的项或者磁盘上没有相应的文件，CreateObject就会失败）只不过是运行时绑定（“后绑定”）而已，后绑定有它灵活的一而，但是效率上比不上前绑定（在设计时显式引用，然后对变量显式声明类型）

OLE也需要引用，不过它是默认就已经引用上了

johnny05

比较专业的解答，谢谢了

eyeshen

原帖由 小fisher 于 2009-3-14 15:19 发表
Createobject是通过在注册表中搜索Createobject提供的参数（也就是组件的名称）在注册表的HKEY_CLASSES_ROOT\中搜索到ADODB.Connection子项，然后通过它下面的CLSID（值为{00000514-0000-0010-8000-00AA006D2EA4}）， ...

谢谢各位啊，解释得非常详细，谢谢！！！！那么引用的分版本吗？ 2.0~2.8其中一个？，是不是自动获取的，那样不就比自己去引用好？

因为Excel2000一般引用2.1，Excel2003引用2.7，如果Excel2003版本的时候引用了2.7，到了Excel2000的版本使用就会出错了。

aidixiao

感谢分享。

851218jg

留作记号，学习研究