最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

用vbs判斷系統(tǒng)補(bǔ)丁的腳本

 更新時(shí)間:2008年04月14日 21:30:35   作者:  
來自微軟腳本專家的可以查看系統(tǒng)中安裝了,哪些補(bǔ)丁的vbs腳本
 

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."


如何關(guān)閉 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

相關(guān)文章

最新評(píng)論

望都县| 岑溪市| 鄯善县| 会同县| 云阳县| 栾城县| 龙口市| 白玉县| 蒙自县| 化州市| 牙克石市| 沙雅县| 中宁县| 台安县| 濮阳市| 秭归县| 天等县| 陕西省| 曲周县| 喀什市| 昂仁县| 错那县| 湄潭县| 大城县| 伊通| 雷山县| 青龙| 墨江| 荣昌县| 郧西县| 巨野县| 青河县| 西平县| 黎平县| 含山县| 香格里拉县| 泰顺县| 商都县| 葫芦岛市| 筠连县| 上杭县|