Ошибка 80070002 при использовании UpdateSearcher.Search - PullRequest
Новая
       25

Ошибка 80070002 при использовании UpdateSearcher.Search

0 голосов
/ 12 июня 2018

Я нашел этот VBScript на официальном веб-сайте MSDN для проверки обновлений в автономном режиме с помощью файла wsusscn2.cab (https://msdn.microsoft.com/en-us/library/windows/desktop/aa387290(v=vs.85).aspx). Это код, указанный: 

Set UpdateSession = CreateObject("Microsoft.Update.Session")
Set UpdateServiceManager = CreateObject("Microsoft.Update.ServiceManager")
Set UpdateService = UpdateServiceManager.AddScanPackageService("Offline Sync Service", "C:\wsusscn2.cab", 1)
Set UpdateSearcher = UpdateSession.CreateUpdateSearcher()

WScript.Echo "Searching for updates..." & vbCRLF

UpdateSearcher.ServerSelection = 3 

UpdateSearcher.ServiceID = UpdateService.ServiceID

Set SearchResult = UpdateSearcher.Search("IsInstalled=0")

Set Updates = SearchResult.Updates

If searchResult.Updates.Count = 0 Then
    WScript.Echo "There are no applicable updates."
    WScript.Quit
End If

WScript.Echo "List of applicable items on the machine when using wssuscan.cab:" & vbCRLF

For I = 0 to searchResult.Updates.Count-1
    Set update = searchResult.Updates.Item(I)
    WScript.Echo I + 1 & "> " & update.Title
Next

WScript.Quit

При выполнении кода яв строке 12 появляется сообщение об ошибке «Системе не удается найти указанный файл». Строка 12 - 

Set SearchResult = UpdateSearcher.Search("IsInstalled=0")

. Сценарий помещается на диск C с файлом wsusscn2.cab..

1 Ответ

0 голосов
/ 05 декабря 2018

У вас проблема с Центром обновления Windows, это не проблема VBScript:

https://support.microsoft.com/en-us/help/4027322/windows-update-troubleshooter

...