Set objWMIService = GetObject („winmgmts: \ \. \ Wurzel \ cimv2“)
colServiceList = objWMIService.ExecQuery einstellen („* von Win32_Service vorwählen in dem Name = „wuauserv“ ")
Für jedes objService im colServiceList
objService.StartService ()
objService.ChangeStartMode („automatisch“)
Zunächst
Const AU_ENABLE = 4
objAutoUpdate = CreateObject („Microsoft.Update.AutoUpdate“) einstellen
objSettings = objAutoUpdate.Settings einstellen
objSettings.NotificationLevel = AU_ENABLE
objSettings.Save
|