近期找回以前测试过一段ADODB代码，想试试一些想法，却发现运行显示“OLE IDispatch 异常代码 0 出 ADODB.Connection 未找到提供程序，该程序可能未正确安装”，印象中当时是可以正常运行的，不知是不是哪步前置条件错了

lcGetxls="D:\202306120611.xlsx"
loADOc = Createobject('ADODB.Connection')
loADOc.ConnectionString = [Provider=Microsoft.Ace.OLEDB.16.0;Extended Properties="Excel 12.0 Xml;HDR=YES;IMEX=1;";Persist Security Info=False;Data Source=]+lcGetxls+[;Mode=Share Exclusive;]
loADOc.Open()

系统环境是WIN 11，OFFICE 2021，有安装Access（OFFICE 是用映象安装不是精简版），检查过ODBC的64位和32位的驱动程序也有存在

后来也下载安装了AccessDatabaseEngine_X64也不行

不知缺了哪个环节？

找到原因

缺少ADODB组件，在网络上找找。

64Bit的系统、64Bit的Office，装32Bit的驱动还得想想办法

无ADODB？