关闭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