[文件操作] 【已解决】批处理怎样根据文件夹名前2位新建文件夹并把相同前2位文件夹归类成子文件夹

bellacong

【小女子求助大佬】根据文件夹名前2位新建文件夹并把相同前2位文件夹归类成子文件夹

大家好，我是初学者。
我没有代码的学习经历，
但是我已经在努力学习，
不想作为一个伸手党麻烦大家。
但现在确实遇到了困难。

我想要把这些文件夹归类，
先按照文件夹前缀两位新建文件夹，例如01,02,03
再把前缀两位是01的文件夹都归类到01文件夹中。
变成01文件夹里有子文件夹01张三1月，01张三2月这样。

之前我在网上找了好久，看到了不分类文件夹，
分类文件的代码，也测试成功了。
不知道能不能将这个代码稍稍改动然后应用。

或者哪个大佬能帮忙写个代码，告诉我如何实现。
万分感谢。

/*&cls
@echo off
for /f "delims=" %%a in ('dir /a-d/b *.jpg^|cscript -nologo -e:jscript "%~f0"') do (
  md "%%a\"
  move /y "%%a*.jpg" "%%a\"
)
pause&exit
*/

var t='', map={}, files = WScript.StdIn.ReadAll().split('\r\n');
for (var i=0; i<files.length; i++){
    var str = files[i].replace(/(.{2}).+$/,'$1')
    if(!map[str]){map[str] = true;t+=str+'\r\n';}
}
WSH.echo(t);
复制代码

因为这个代码是批量整理图片的.jpg但是怎么能变成整理文件夹啊……这个我真的不会了。o(╥﹏╥)o

netdzb

回复 1# bellacong


你里面有javasrcipt的代码，还有vbs的代码吗?

我觉得你先写出第一步，根据子文件佳的序号，建立01和02等文件夹，
批处理是可以分割字符串的。

你先把第一步的代码完成了吧。

zaqmlp

@echo off
set info=互助互利,支付宝扫码头像,感谢打赏
rem 有问题,可加QQ956535081及时沟通
cd /d "%~dp0"
set len=2
for /f "delims=" %%a in ('dir /ad/b') do (
    set "fd=%%a"
    set "fn=%%~nxa"
    setlocal enabledelayedexpansion
    if not exist "!fn:~,%len%!\" md "!fn:~,%len%!\"
    echo;"!fd!" --^> "!fn:~,%len%!\"
    move "!fd!" "!fn:~,%len%!\"
    endlocal
)
echo;%info%
pause
exit
复制代码

smss

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b /ad "%~dp0*"') do (set "p=%%i"
if not exist "%~dp0!p:~0,2!" md "%~dp0!p:~0,2!"
move "%%i" "%~dp0!p:~0,2!"
)
pause
复制代码

funken

回复 4# smss

有变量延迟，出现了最大归递层，有办法吗，以前我经常这样，无奈的就掉了变量延迟哎。。头疼