用bat命令重启explorer的方法

来源:互联网 发布:淘宝banner尺寸大小 编辑:程序博客网 时间:2024/06/14 19:20



下面文件保存为bat就可以

@echo offtitle 重启 Explorer 示例程序set/p "p=即将重启 Explorer,"<nul & pauseCall :_RestartExplorerecho 完成!pause:: 重启 Explorergoto :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

参考资料:http://www.bathome.net/thread-32834-1-1.html
0 0