重启文件资源管理器explorer

关闭explorer

1.开始菜单

可以再开始菜单中按住ctrl+shift并且鼠标右键单击关机按钮附近，就会出现退出资源管理器。

2.关机界面

按一下win键，然后按两次alt+f4进入关机界面，按住ctrl+shift+alt并且鼠标左键单击取消，就会关闭资源管理器。

3.命令行 

bat/cmd

taskkill /f /im explorer.exe

 vbs

Dim objWshShell
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run "tskill explorer", 0, True

开启explorer

1.运行

运行explorer或explorer.exe 

2.任务管理器

按ctrl+shift+esc进入任务管理器，点击文件-新建任务-和运行同理

3.命令行 

start explorer

重启explorer

在explorer关闭的时候会把打开的文件夹等关闭，并且重启后无法恢复，这里实现恢复了打开过的文件夹，但是状态不会恢复，比如最小化等。

vbs代码

Call RestartExplorer()
Function RestartExplorer()
  Dim arrURL(), strURL, oShell, oWin, n
  n = -1
  Set oShell = CreateObject("Shell.Application")
  For Each oWin In oShell.Windows
    If Instr(1, oWin.FullName, "\explorer.exe", vbTextCompare) Then
      n = n + 1
      ReDim Preserve arrURL(n)
      arrURL(n) = oWin.LocationURL
    End If
  Next
  CreateObject("WScript.Shell").run "tskill explorer", 0, True
  For Each strURL In arrURL
    oShell.Explore strURL
  Next
End Function

bat/cmd代码

@echo off
title 重启 Explorer 示例程序
set/p "p=即将重启 Explorer，"<nul & pause

Call :_RestartExplorer
echo 完成！
pause

:: 重启 Explorer
goto :eof
:_RestartExplorer
(
  echo Dim arrURL^(^), strURL, oShell, oWin, n
  echo n = -1
  echo Set oShell = CreateObject^("Shell.Application"^)
  echo For Each oWin In oShell.Windows
  echo   If Instr^(1, oWin.FullName, "\explorer.exe", vbTextCompare^) Then
  echo     n = n + 1
  echo     ReDim Preserve arrURL^(n^)
  echo     arrURL^(n^) = oWin.LocationURL
  echo   End If
  echo Next
  echo CreateObject^("WScript.Shell"^).run "tskill explorer", 0, True
  echo For Each strURL In arrURL
  echo   oShell.Explore strURL
  echo Next
)>"%temp%\RestartExplorer.vbs"
  CScript //NoLogo "%temp%\RestartExplorer.vbs"
  del /q /f "%temp%\RestartExplorer.vbs"
  goto :eof

参考

[已解决]怎样用bat重启explorer资源管理器不关闭打开的文件夹呢？ - BAT求助&讨论 - 批处理之家 批处理_BAT脚本_PowerShell_VBS_CMD_DOS_Perl_Python - Powered by Discuz!