Unable to restart Windows Explorer with AHK

[gx240]

Code: Select all

$f4::
sleep 5000
run taskkill /F /IM explorer.exe 
sleep 5000
run explorer.exe     ;;;;; This doesn't work. It only opens a "This PC" window.
return

On Windows 10 if you kill explorer.exe the Start menu, taskbar, and desktop all disappear leaving nothing but a black screen. You can then start explorer.exe again from the Task Manager to bring everything back.

Starting explorer from an AHK script doesn't seem to work though. When I use "run explorer.exe" in an AHK script it just opens a window showing "This PC." It doesn't bring back the whole Windows Explorer UI (the Start menu, taskbar, desktop, etc). It looks like this:

2.png (93.33 KiB) Viewed 867 times

But if I open the Task Manager and run "explorer" from the "Create new task" window, then explorer.exe runs correctly and the Start menu, taskbar, and desktop return.

1.png (53.69 KiB) Viewed 867 times

Why does running the same command lead to different outcomes in an AHK script and the "Create new task" window?

[GEV]

Try this

Code: Select all

$f4::
	RunWait, %comspec% /c taskkill /f /im explorer.exe ,,hide
	Process, WaitClose, explorer.exe
	; sleep 500
	Run, explorer.exe
return

[gx240]

Unfortunately that does the same thing. It just opens a "This PC" window instead of restarting the whole explorer.exe with the Start menu, taskbar, and desktop. I've also tried running the script as both admin and non-admin.

I'm just confused as to why the run command is producing different results when it comes from an AHK script.

[lmstearn]

There is a script SKAN posted a while back - any help? Edit: Oops, doesn't relaunch explorer (W10) as is the problem here, sorry, perhaps the more forceful method malcev posted there works instead?
Another way is to use the Restart Manager API, where you could use the C++ functions in this SO answer, doing so might require some investment in time, however.

[GEV]

You can also try this VBScript:

Code: Select all

Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") 
Set colProcess = objWMIService.ExecQuery ("Select * from Win32_Process Where Name = 'explorer.exe'")
For Each objProcess in colProcess
  objProcess.Terminate()
Next
Set objProcess = objWMIService.Get("Win32_Process")
intreturn = objProcess.Create ("explorer.exe","",SW_NORMAL)

Save the file as Restart Explorer.vbs

[V0RT3X]

@gx240, I don't know that this will do you any better, but it works for me on 64-bit Windows 10. But then again, @GEV's works for me also.

viewtopic.php?t=91600

[jrachr]

Try this.Scroll to the bottom.Works for me.

viewtopic.php?f=76&t=122098