找不到VBScript ADODB.Connection Provider

Question

当我尝试运行此VBScript将新项目添加到我的SharePoint列表中时：

Const spURL = "mySharePointURL"
Const myListID = "{myListID}"
Const qStr = "SELECT * FROM [myList];"
Dim cn
Dim rs
Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;WSS;IMEX=0;RetrieveIds=Yes;DATABASE=" & spURL & ";LIST=" & myListID & ";"
rs.Open qStr, cn, 2, 3
rs.AddNew
rs.Fields("Field1") = "value1"
rs.Fields("Field2") = "value2"
rs.Fields("Field3") = "value3"
rs.Update
rs.Close
cn.Close

我收到此错误：

（第8行是cn.Open....）

此代码的VBA版本可以正常工作。 做了一些研究，并尝试了以下方法，但无济于事：

• 安装Access数据库引擎（32位和64位）
• 同时使用SysWOW64 \ wscript.exe和System32 \ wscript.exe来运行脚本
• 使用Office 32位和64位
• 将连接字符串中的OLEDB版本更改为14.0或10.0

关于什么可能导致此问题和/或如何解决的任何建议？

我要使用VBScript而不是Excel来运行该程序的原因是，在此过程运行时，Excel不必要地冻结了，有时可能需要一分钟。