用vbs判断系统补丁的脚本

作者: 积月累
来源: 51数据库
2021-08-01

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
   wscript.echo colupdates.item(i).title
next

'wscript.echo "this update is not installed."

如何关闭 windows xp service pack 2 防火墙？

set objfirewall = createobject("hnetcfg.fwmgr")set objpolicy = objfirewall.localpolicy.currentprofile
objpolicy.firewallenabled = falseset objfirewall = createobject("hnetcfg.fwmgr")set objpolicy = objfirewall.localpolicy.currentprofile
objpolicy.firewallenabled = false

推荐阅读