i've just looked on a Win10 machine, its not creators as i'm at work (im on XP here myself...) you dont set quiet, you set active, had it in reverse. you can only set active hours upto 12hr long, dunno if last update changed anything but i've never had it restart on me but i only use it 5pm-1am weekdays.
As long as indexing is on (same as win7) it works the same way but you lose the ability to set reminders and send/receive text messages and notifications from your mobile
i've never had this, but my boss had this on Win10, 7 and Vista. i've no idea how they do it but yeah its a pain in the ass to fix. thats more of a Windows bug than unique to 10. you can recover it to a microsoft account after you have fixed the user account
Never seen this clip?
Ah, right, there is a solution:
Just turn it off, and it won't reboot while it's turned off.
I Think that some people at Microsoft doesn't see the issue here:
Ok, installing updates make the computer lag for a while. But at least it doesn't throw off users.
The problem is the rebooting.
There wasn't long ago there was an "important" patch that required a reboot.
What it did? It changed something with the time zones at the city of Novosibirsk. So, well, in a way I understand Microsoft doesn't want to really shout out what the patches that require a reboot do. I mean, as I'm not even living in Russia (also as set in regional options from where time zone is picked), it's obvious I need the new Novosibirsk timezone *now*. It's very important and not something that can wait until the next patch tuesday or something. Telling me "This patch sets the Clock right if you live in the Novosibirsk region" might make users want to install this patch later, and perferably in the monthly batch of other patches like the dotnet ones, would make me Think "ok I don't need this patch *now* I can wait until some rollup update" and that wouldn't be good for the patchmakers if people want to install them later. ( https://support.microsoft.com/sv-se/help/3182203/september-2016-time-zone-change-for-novosibirsk )
Again, my setting is that I automatically fetch and install updates after a Schedule.
The thing I decide when it happens is the rebooting. I can make a setting so I can run the script to update my computer and then reboot it immediately afterwards (so it's ready to go when I come back for lunch). Or I can install all updates, those that can be installed live gets installed within minutes and the ones that require a reboot will have to wait until I don't have anything serious running, *then* I can reboot, or get those patches installed when I shutdown the computer normally.
option explicit
Const AllUpdates=True ' True or false
Const LicenseAgreementAccept = "N" ' Y or N
Function IsAdmin
dim key
dim ObjShell
dim retval
on error resume next
key = CreateObject("WScript.Shell").RegRead("HKEY_USERS\s-1-5-19\")
If err.number <> 0 Then
retval = 0
else
retval = -1
end if
IsAdmin = retval
end function
Sub Elevate
dim ObjShell
If WScript.Arguments.length = 0 Then
Set objShell = CreateObject("Shell.Application")
'Pass a bogus argument with leading blank space, say [ uac]
objShell.ShellExecute "cscript.exe", Chr(34) & WScript.ScriptFullName & Chr(34) & " uac", "", "runas", 1
else
if not IsAdmin then
wscript.echo "Uh?"
end if
End If
end sub
sub DoGetUpdates
dim I, StrInput
dim UpdateSession, UpdateSearcher, SearchResult, Update, UpdatesToDownload, Downloader, UpdatesToInstall, Installer, InstallationResult
dim AddThisUpdate
dim SearchString
if AllUpdates then
SearchString = "IsInstalled=0 and Type='Software' and IsHidden=0"
else
SearchString = "IsInstalled=0 and Type='Software' and IsHidden=0 and AutoSelectOnWebSites=1"
end if
Set updateSession = CreateObject("Microsoft.Update.Session")
updateSession.ClientApplicationID = "MSDN Sample Script"
Set updateSearcher = updateSession.CreateUpdateSearcher()
WScript.Echo "Searching for updates..." & SearchString
Set searchResult = updateSearcher.Search(SearchString)
WScript.Echo "Applicable items on the machine=" & cStr(searchResult.Updates.Count) & ":"
For I = 0 To searchResult.Updates.Count-1
Set update = searchResult.Updates.Item(I) : WScript.Echo I + 1 & "> " & update.Title
Next
Set updatesToDownload = CreateObject("Microsoft.Update.UpdateColl")
For I = 0 to searchResult.Updates.Count-1
Set update = searchResult.Updates.Item(I)
addThisUpdate = false
If update.InstallationBehavior.CanRequestUserInput = true Then
WScript.Echo I + 1 & "> skipping: " & update.Title & " because it requires user input"
Else
If update.EulaAccepted = false Then
WScript.Echo I + 1 & "> note: " & update.Title & " has a license agreement that must be accepted:"
WScript.Echo update.EulaText
If LicenseAgreementAccept = "Y" or LicenseAgreementAccept = "y" Then
update.AcceptEula()
addThisUpdate = true
Else
WScript.Echo I + 1 & "> skipping: " & update.Title & " because the license agreement was declined"
End If
Else
addThisUpdate = true
End If
End If
If addThisUpdate = true Then
WScript.Echo I + 1 & "> adding: " & update.Title
updatesToDownload.Add(update)
End If
Next
If updatesToDownload.Count = 0 Then
WScript.Echo "All applicable updates were skipped."
else
WScript.Echo "Downloading updates..."
Set downloader = updateSession.CreateUpdateDownloader()
downloader.Updates = updatesToDownload
downloader.Download()
Set updatesToInstall = CreateObject("Microsoft.Update.UpdateColl")
WScript.Echo vbCRLF & "Successfully downloaded updates=" & cStr(updatesToInstall.Count) & ":"
For I = 0 To searchResult.Updates.Count-1
set update = searchResult.Updates.Item(I)
If update.IsDownloaded = true Then
WScript.Echo I + 1 & "> " & update.Title
updatesToInstall.Add(update)
If update.InstallationBehavior.RebootBehavior > 0 Then
WScript.Echo " ^-- This one may reqire a reboot"
else
End If
End If
Next
WScript.Echo "Installing updates..."
Set installer = updateSession.CreateUpdateInstaller()
installer.Updates = updatesToInstall
Set installationResult = installer.Install()
'Output results of install
WScript.Echo "Installation Result: " & installationResult.ResultCode
WScript.Echo "Reboot Required: " & installationResult.RebootRequired & vbCRLF
WScript.Echo "Listing of updates installed and individual installation results:"
For I = 0 to updatesToInstall.Count - 1
WScript.Echo I + 1 & "> " & updatesToInstall.Item(i).Title & ": " & installationResult.GetUpdateResult(i).ResultCode
Next
end if
end sub
sub SigUpdate
dim objshell
set objShell = wscript.CreateObject("wscript.shell")
WScript.Echo "Updating signatures"
objShell.Run "cmd.exe /c c:\windows\UpdSigs.cmd",2,1
end sub
sub CompileDotnet
dim objshell
set objShell = wscript.CreateObject("wscript.shell")
WScript.Echo "Compiling dotnet"
objShell.Run "cmd.exe /c for /D %i in (%windir%\microsoft.net\framework\* %windir%\microsoft.net\framework64\*) do call %i\ngen executequeueditems",2,1
end sub
Sub DoRebootIfNeeded
dim objshell
dim ObjSysInfo
Set objSysInfo = CreateObject("Microsoft.Update.SystemInfo")
if objSysInfo.RebootRequired then
set objShell = wscript.CreateObject("wscript.shell")
objShell.Run "shutdown.exe /R /T 360000 /C ""Datorn kommer startas om om 360000 sekunder - spara ditt arbete!"" "
end if
end sub
If IsAdmin then
DoGetUpdates
SigUpdate
CompileDotNet
DoRebootIfNeeded
else
elevate
end if
Information security should always be proactive. Once an attack has happened it can't be undone!
Nonetheless, the due diligence is appreciated.
Information security should always be proactive. Once an attack has happened it can't be undone!
