用vbs实现确定是否安装了某个特定的补丁
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
问: 您好,脚本专家!如何使用脚本来确定是否安装了某个特定的补丁? --GM 答: 您好,GM。您知道,不久以前这个问题可能被我们“不小心”扔进了废纸篓并且假装从未看到。为什么?嗯,以前的时候,我们获得关于补丁、快速修复和其他更新的信息的唯一方法就是使用WMI类Win32_QuickFixEngineering。这样挺好的,但是由于各种原因,Win32_QuickFixEngineering偶尔会丢失确实已经安装了的补丁;更糟糕的是,在Windows2000计算机上,Win32_QuickFixEngineering有时会处于待命状态,而不返回任何信息。(如何解决这一问题?当然是指通过安装补丁来解决。)无论如何都不能算一件好事。 但是,那些日子都过去了。现在,多亏具有重大改进的新WindowsUpdate服务,要确定计算机上已安装了和尚未安装哪些更新非常容易。例如,以下脚本可以告诉我们计算机上是否已安装了补丁SecurityUpdateforWindowsXP(KB899587): SetobjSession=CreateObject("Microsoft.Update.Session") SetobjSearcher=objSession.CreateUpdateSearcher SetobjResults=objSearcher.Search("Type=''Software''") SetcolUpdates=objResults.Updates Fori=0tocolUpdates.Count-1 IfcolUpdates.Item(i).Title=_ "SecurityUpdateforWindowsXP(KB899587)"Then IfcolUpdates.Item(i).IsInstalled<>0Then Wscript.Echo"Thisupdateisinstalled." Wscript.Quit Else Wscript.Echo"Thisupdateisnotinstalled." Wscript.Quit EndIf EndIf Next Wscript.Echo"Thisupdateisnotinstalled." 我们将不详细介绍每一行代码,解释WindowsUpdate服务的详细情况有点超出了本专栏的范围。如果您想了解有关WindowsUpdate(尤其是诸如Microsoft.Update.Session之类的对象)的详细信息,请参阅我们的“脚本故事”专栏中的我要得到你,我的美人…并且我们也要管理WindowsUpdate啦! 但是,我们会发现,尽管有Search方法,但我们并不是真的搜索某个具体的更新。搜索意味着只去查找所需的项,其精确度是极低的。因此我们不能真的那样做。相反,我们在此要做的是返回所有更新的集合,然后筛选整个集合,查找标题为SecurityUpdateforWindowsXP(KB899587)的更新。最终结果是一样的,但是我们达到这一最终结果的过程稍有不同。 不,没有什么不同。就您想了解的内容而言。 那么,我们在此采用的过程是什么?嗯,首先使用下面四行代码来检索本地计算机的更新集合: SetobjSession=CreateObject("Microsoft.Update.Session") SetobjSearcher=objSession.CreateUpdateSearcherSet objResults=objSearcher.Search("Type=''Software''") SetcolUpdates=objResults.Updates 注意:是的,此脚本可针对远程计算机运行。有关详细信息,请参阅脚本故事专栏。 检索该集合之后,设置一个ForNext循环以遍历所有项。在该循环内,使用下面一行代码来确定更新的“标题”是否为SecurityUpdateforWindowsXP(KB899587): IfcolUpdates.Item(i).Title=_ "SecurityUpdateforWindowsXP(KB899587)"Then 我们假定“标题”是SecurityUpdateforWindowsXP(KB899587)。在这种情况下,接下来要检查IsInstalled属性的值。如果IsInstalled等于0,则表示实际没有安装该更新(可能安装失败了,也可能安装了该更新但后来又删除了)。如果IsInstalled不等于0,则表示已经安装了该更新。检查该值,然后回显相应的消息: IfcolUpdates.Item(i).IsInstalled<>0Then Wscript.Echo"Thisupdateisinstalled." Wscript.Quit Else Wscript.Echo"Thisupdateisnotinstalled." Wscript.Quit EndIf 您会发现,回显消息之后,我们就会终止该脚本。为什么?嗯,更新标题是唯一的:既然我们已经找到了要查找的更新,就无需继续遍历剩下的集合了。因此,我们也就终止了脚本,并回到我们的生活中。 如果“标题”不是SecurityUpdateforWindowsXP(KB899587)怎么办?在这种情况下,我们只要进入下一轮循环并检查集合中的下一项即可。如果我们确实再也找不到具有指定标题的更新,则最终会退出该循环,然后执行最后一行代码,仅报告没有安装该更新。 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢! |
你可能对下面的文章感兴趣
关于用vbs实现确定是否安装了某个特定的补丁的所有评论