Windows 11 restart bug - místo restartu se jen odhlásí

[petr22]

Jestli zustava pod uctem uzivatelem bezet sluzba i po ukonceni aplikace, tak se da sestrelit taskkillem.

Bezne takto sundavam sluzby, ktere zustaly viset ve stavu "stopping" nebo "starting" aby nebyl nutny restart PC.

[Reklama]

[ITCrowd]

Služby, jež aplikace používá, běží pod standardním systémovým účtem. Stopping neexistuje. Starting taky ne. Buď je stopped, nebo start pending. Někde to mám napsáno...
Nicméně u Win10 se službami rozhodně problém není.
Jen tak naokraj, zkoušeno na jiném stroji - když po startu systému a náběhu do přihlašovací obrazovky dám restartovat (bez přihlášení), tak to hodí hlášku jetli jsem si jist, že je k počítači někdo přihlášen. Kdo kua? Mrkvosoftí duch?

[petr22]

Presne o tom jsem psal, ze nam obcas W11 delaji taky. Zadny dalsi uzivatel tam samozrejmne v tu chvili neni.

Ten restart po kterem se to stane je provedeny nejak podezrele rychle, kdyz se nasledne da restart, potvrdi ze
dalismu uzivateli prerusim praci tak ten restart trva normalne dlouho a po nem uz zadny problem neni.

[ITCrowd]

Tak nakonec krkolomně vyřešeno... Pod ikonou je skript, který uživatele pouze odhlásí. Před gpedit zadán skript, který při odhlášení uživatele restartuje počítač. zatím to vypadá v pořádku.
Všem děkuji za příspěvky.

[Martab]

Téma odemknuto.

[ITCrowd]

Díky.
Tak pokračování
Výše uvedené řešení se ukázalo jako nekomfortní. Nefunguje 100% vždy a pokud se potřebuji přihlásit jako lokální admin na nějakou úpravu a předtím odhlásím uživatele, pak se PC restartuje. A ne všechny operace jdou udělat, pokud je mimo mě přihlášený další uživatel.
Takže nezbylo, než si to pořádně projít. Zjistil jsem, že si Win11 samovolně spouští procesy, které pak pozastaví. Např.:
- Fotky. Nechápu proč. Proces je spuštěn, pozastaven, a to i v případě, kdy prokazatelně žádná fotka prohlédnuta nebyla.
- Hledání. Zde bych to i pochopil - jedná se o urychlení případného vyhledávání v nabídce start. Nicméně pro technologický počítač k ničemu.
- Nastavení. Nikdo nic nenastavuje.
Všechny tyto procesy spuštěny a pozastaveny s RuntimeBroker. Vypadá to tak, že po "sestřelení" těchto aplikací už restart proběhne normálně. Zkusím na to vymyslet skript a případně ho dám k dispozici.

[ITCrowd]

Tak sem dávám skript, který zmíněný problém řeší jinak - ukončuje všechny procesy, které restartu bránily, poté vyvolá restart.
Zatím se to tváří funkčně.

Kód: Vybrat vše

'***********************************************************
'*     Ukončuje procesy bránící normálnímu restartu        *
'***********************************************************
'*          Etienn@Script v 1.0 (c) 05/2023                *
'***********************************************************
'
' Action = 1 => shutdown
' Action = 2 => restart
' Action = 0 => logoff
' Action = 8 => poweroff
' Force = Action + 4

Option Explicit
Dim strComputer, objWMIService, colProcessList, intTimeOut, strComment, intFlags, intReason
Dim colOperatingSystems, objOperatingSystem, objProcess


strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")


Set colProcessList = objWMIService.ExecQuery _
    ("Select * from Win32_Process Where Name LIKE '%Microsoft.Photos%'")

For Each objProcess in colProcessList
    objProcess.Terminate()
Next


Set colProcessList = objWMIService.ExecQuery _
    ("Select * from Win32_Process Where Name LIKE '%SearchHost%'")

For Each objProcess in colProcessList
    objProcess.Terminate()
Next


Set colProcessList = objWMIService.ExecQuery _
    ("Select * from Win32_Process Where Name LIKE '%taskhostw%'")

For Each objProcess in colProcessList
    objProcess.Terminate()
Next


Set colProcessList = objWMIService.ExecQuery _
    ("Select * from Win32_Process Where Name = 'SystemSettings'")

For Each objProcess in colProcessList
    objProcess.Terminate()
Next

'restart rutina

Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate,(Shutdown)}!\\" & strComputer & "\root\cimv2")


intTimeOut = 10 'Countdown time (in seconds) before action
strComment = "Pracoviště se restartuje" 'Message to display
intFlags = 2 'Set of flags to shutdown the computer
intReason = 2147483649


Set colOperatingSystems = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colOperatingSystems
objOperatingSystem.Win32ShutdownTracker intTimeOut,strComment,intReason,intFlags
Next


[pcmaker]

Funguje pěkně. Děkujeme.

[ITCrowd]

Není zač
Jen poznámka - třída .Terminate může ukončit pouze procesy spuštěné s právy uživatele (což zmíněné jsou). Např. pro služby běžící pod vyššími právy, než skript, takto ukončit nelze.