Windows CreateUpdateDownloader如何知道下载哪些文件？
Windows CreateUpdateDownloader如何知道下载哪些文件？,windows,vbscript,wuapi,Windows,Vbscript,Wuapi,CreateUpdateDownloader如何下载文件？我问是因为我的系统缺少4kbs 通过在脚本中迭代更新集合，我得到了缺少的4个KBs的标题 但是，当我将该集合分配给CreateUpdateDownloader时，我在C:\Windows\SoftwareDistribution\Download中只找到1KB 有没有想过为什么它没有下载其他3kbs？是的，我现在只想扫描和下载——试着通过观察它的运行来了解它是如何工作的。我将在以后安装，因为我想调整其中的一些 守则如下： Dim sess
CreateUpdateDownloaderCreateUpdateDownloaderDim session : Set session = CreateObject("Microsoft.Update.Session")
Dim search : Set search = session.CreateUpdateSearcher()
WScript.Echo "Searching for updates..." & vbCrLF
Set result = search.Search("IsInstalled=0 AND Type='Software' AND IsHidden=0")
WScript.Echo "Missing KBs:"
For i = 0 To result.Updates.Count -1 'last item in the collection always seems to be some kind of gibberish null.
Set update = result.Updates.Item(i)
WScript.Echo i + 1 & "> " & update.Title
Next
If result.Updates.Count = 0 Then
WScript.Echo "There are no applicable updates."
End If
Set downloader = session.CreateUpdateDownloader()
downloader.Updates = result.Updates ' updatesToDownload
downloader.Download()
必须使用它Microsoft.Update.UpdateColl来收集要下载的更新。 函数CopyFromCache允许下载更新的本地副本。 属性下载URL将允许您从Internet下载。 这是非常有用的 这是我“第一次”编写代码。 前5个更新被下载到d:\updates目录，并列出它们对应的URL
Dim session : Set session = CreateObject("Microsoft.Update.Session")
Dim search : Set search = session.CreateUpdateSearcher()
WScript.Echo "Searching for updates..." & vbCrLF
Set result = search.Search("IsInstalled=0 AND Type='Software' AND IsHidden=0")
WScript.Echo "Missing KBs:"
For i = 0 To result.Updates.Count -1 'last item in the collection always seems to be some kind of gibberish null.
Set update = result.Updates.Item(i)
WScript.Echo i + 1 & "> " & update.Title
Next
If result.Updates.Count = 0 Then
WScript.Echo "There are no applicable updates."
End If
Set updatesToDownload = CreateObject("Microsoft.Update.UpdateColl")
Set downloader = session.CreateUpdateDownloader()
'For I = 0 to result.Updates.Count-1
For I = 0 to 5
Set update = result.Updates.Item(I)
updatesToDownload.Add(update)
Next
WScript.Echo vbCRLF & "Downloading updates..."
downloader.Updates = updatesToDownload
downloader.Download()
'For I = 0 to result.Updates.Count-1
for i=0 to 5
for each upd in downloader.Updates.Item(i).BundledUpdates
upd.CopyFromCache "d:\UPDATES", False
for each content in upd.DownloadContents
wscript.echo "url: " & content.DownloadURL
next
next
next
正在检查可能请求用户输入或提供EULA的更新。这里会是这样吗？
%windir%\WindowsUpdate.log