从vbscript启用/禁用windows-update

Question

我需要从我的安装中禁用windows-update服务。我已经使用vbscript做了一些事情，所以我想用vbscript来做。

我的vbscript (或任何其他脚本语言)的知识是非常有限的so...can有人能帮我解决这个问题吗？我会非常感谢的！

谢谢。

Answer 1

谢谢Tomalak和Patrick Cuff。我真的很感谢你的帮助。我认为这可能是一个好的和完整的答案。

方法1:防止“自动更新”服务在机器启动时自动启动。

strComputer = "."  'could be any computer, not just the local one '
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where Name = 'wuauserv'")

For Each objService in colServiceList
  objService.ChangeStartMode("Disabled")
Next

方法二:将“自动更新”配置从“自动”更改为“关闭自动更新”。(MSDN列出the other NotificationLevel constants

Const AU_DISABLED = 1

Set objAutoUpdate = CreateObject("Microsoft.Update.AutoUpdate")
Set objSettings = objAutoUpdate.Settings

objSettings.NotificationLevel = AU_DISABLED
objSettings.Save

在这两种情况下，您都不会获得自动更新。使用方法1不会启动，而使用方法2服务仍在运行，只是不做任何事情。

您可以通过GUI执行以下两项操作：

控制面板方法1:管理工具\服务\自动更新，将“启动类型”从“自动”更改为“"Disabled".

• Method 2：
• \自动更新”，选择“关闭自动更新”。

Answer 2

谢谢你Tomalak。

我还发现：

Const SCHEDULED_INSTALLATION = 1

Set objAutoUpdate = CreateObject("Microsoft.Update.AutoUpdate")
Set objSettings = objAutoUpdate.Settings

objSettings.NotificationLevel = SCHEDULED_INSTALLATION
objSettings.Save

这是链接：http://www.microsoft.com/technet/scriptcenter/resources/tales/sg0705.mspx