答： 您好，GM。您知道，不久以前這個問題可能被我們“不小心”扔進了廢紙簍并且假裝從未看到。為什么？嗯，以前的時候，我們獲得關于補丁、快速修復和其他更新的信息的唯一方法就是使用 WMI 類 Win32_QuickFixEngineering。這樣挺好的，但是由于各種原因，Win32_QuickFixEngineering 偶爾會丟失確實已經安裝了的補丁；更糟糕的是，在 Windows 2000 計算機上，Win32_QuickFixEngineering 有時會處于待命狀態，而不返回任何信息。（如何解決這一問題？當然是指通過安裝補丁來解決。）無論如何都不能算一件好事。
但是，那些日子都過去了。現在，多虧具有重大改進的新 Windows Update 服務，要確定計算機上已安裝了和尚未安裝哪些更新非常容易。例如，以下腳本可以告訴我們計算機上是否已安裝了補丁 Security Update for Windows XP (KB899587)：
Set objSession = CreateObject("Microsoft.Update.Session") Set objSearcher = objSession.CreateUpdateSearcher Set objResults = objSearcher.Search("Type='Software'") Set colUpdates = objResults.Updates
For i = 0 to colUpdates.Count - 1 If colUpdates.Item(i).Title = _ "Security Update for Windows XP (KB899587)" Then If colUpdates.Item(i).IsInstalled > 0 Then Wscript.Echo "This update is installed." Wscript.Quit Else Wscript.Echo "This update is not installed." Wscript.Quit End If End If Next
Wscript.Echo "This update is not installed."
我們將不詳細介紹每一行代碼，解釋 Windows Update 服務的詳細情況有點超出了本專欄的范圍。如果您想了解有關 Windows Update（尤其是諸如 Microsoft.Update.Session 之類的對象）的詳細信息，請參閱我們的“腳本故事”專欄中的我要得到你，我的美人…并且我們也要管理 Windows Update 啦！
但是，我們會發現，盡管有 Search 方法，但我們并不是真的搜索某個具體的更新。搜索意味著只去查找所需的項，其精確度是極低的。因此我們不能真的那樣做。相反，我們在此要做的是返回所有更新的集合，然后篩選整個集合，查找標題為 Security Update for Windows XP (KB899587) 的更新。最終結果是一樣的，但是我們達到這一最終結果的過程稍有不同。
不，沒有什么不同。就您想了解的內容而言。
那么，我們在此采用的過程是什么？嗯，首先使用下面四行代碼來檢索本地計算機的更新集合：
Set objSession = CreateObject("Microsoft.Update.Session") Set objSearcher = objSession.CreateUpdateSearcherSet objResults = objSearcher.Search("Type='Software'") Set colUpdates = objResults.Updates
注意：是的，此腳本可針對遠程計算機運行。有關詳細信息，請參閱腳本故事專欄。
檢索該集合之后，設置一個 For Next 循環以遍歷所有項。在該循環內，使用下面一行代碼來確定更新的“標題”是否為 Security Update for Windows XP (KB899587)：
If colUpdates.Item(i).Title = _ "Security Update for Windows XP (KB899587)" Then
我們假定“標題”是Security Update for Windows XP (KB899587)。在這種情況下，接下來要檢查 IsInstalled 屬性的值。如果 IsInstalled 等于 0，則表示實際沒有安裝該更新（可能安裝失敗了，也可能安裝了該更新但后來又刪除了）。如果 IsInstalled 不等于 0，則表示已經安裝了該更新。檢查該值，然后回顯相應的消息：
If colUpdates.Item(i).IsInstalled > 0 Then Wscript.Echo "This update is installed." Wscript.Quit Else Wscript.Echo "This update is not installed." Wscript.Quit End If
