VBScript ADODB.Connection Provider не найден - PullRequest
Новая
       75

VBScript ADODB.Connection Provider не найден

0 голосов
/ 29 мая 2019

Когда я пытаюсь запустить этот 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

Я получаю эту ошибку:

enter image description here

(строка 8 - это cn.Open....)

Версия этого кода на VBA работает нормально.Немного изучил и попробовал следующее, но безрезультатно:

  • установка Access Database Engine (32- и 64-разрядная версия)
  • с использованием обоих, SysWOW64 \ wscript.exeи System32 \ wscript.exe для запуска сценария
  • с использованием Office 32 и 64-разрядных
  • , изменяющих версию OLEDB в строке подключения на 14.0 или 10.0

Любой совет, что может быть причиной этого и / или как это исправить?

Причина, по которой я хочу использовать VBScript для запуска этого, а не Excel, заключается в нежелательном зависании Excel во время выполнения этой процедуры, которая может занятьдо минуты иногда.

...