回复 9# amwfjhh
感谢帮助,我试了下,没反应,win10,
下面的我用,'dir/b/ad/s %%i\*,能用,但路径下的文件夹全部执行关闭,想改下,打开的文件夹,在路径下的才关闭- for %%a in ("%cd%") do echo %%a>>%dp%\1.txt
- dir/ad "%cd%\" >nul 2>nul&&cd..&&goto :ren
- (for /f "delims=" %%a in (%dp%\1.txt) do (setlocal enabledelayedexpansion&for %%i in (%%a) do (set "pat=%%~nxi"&call :ltty
- (if "!pat!" neq "!pan!" if "!pat!" neq "" ren %%i "!pan!"||for /f "tokens=*" %%s in ('dir/b/ad/s %%i\*') do (mshta "javascript:wnds=new ActiveXObject('Shell.Application').windows(); for (i=0; i<wnds.Count; i++) {w=wnds(i); w && w.document && w.document.folder && '%%~nxs'==w.document.folder.title && w.quit();} close();" && ren %%i "!pan!")))&endlocal)&del /f/s/q/a %dp%\1.txt)>nul 2>nul
复制代码
|