[文件操作] [已解决]批处理归类文件会将文件夹移动出来的问题

a6236130

for /r %%a in (*) do call :MvFile "%%~a"
pause
exit
:MvFile
 if "%~f1"=="%~f0" goto :eof
 set "Str=%~n1"
 if not exist "%Str:~0,3%" md "%Str:~0,3%"
 move "%~1" "%Str:~0,3%\"
goto :eof COPY

代码如上，for 加上 /r 后便可对子目录里的文件进行处理，但是在处理完后会将创建的文件夹移动出来，请问如何解决？ 使其子文件夹里处理后的文件夹不被移动出来？

a6236130

回复 2# aloha20200628


   我测试了一下 还是会被移动出来

a6236130

回复 5# aloha20200628


    感谢大哥，是我要的效果！