1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15:
Set = GetObject („winmgmts: \ \. \ wortel \ cimv2“) Vastgestelde colServiceList = objWMIService.ExecQuery („selecteer * uit Win32_Service waar Naam = „wuauserv““) Voor Elke objService in colServiceList objService.StartService () objService.ChangeStartMode („Automatisch“) Daarna Const AU_ENABLE = 4 Reeks objAutoUpdate = CreateObject („Microsoft.Update.AutoUpdate“) Vastgestelde objSettings = objAutoUpdate.Settings objSettings.NotificationLevel = AU_ENABLE objSettings.Save