[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 2# zaqmlp


大佬,你写代码非常好用,但有的就失灵了,请看下图。

如图,明明上层文件夹是大于4个字及以上。
[img][/img]


但运行BAT后,依然可以建立单曲合辑。
[img][/img]

是不是因为上层文件夹名字有下划线或者字母数字没有计算进去,或者什么原因,麻烦帮忙看看哈。

TOP

回复 2# zaqmlp


    感谢大佬,是我想要的功能。给您支付宝付了一杯咖啡,感谢感谢

TOP

本帖最后由 zaqmlp 于 2022-5-20 20:54 编辑
  1. @echo off
  2. set "newfolder=单曲合辑"
  3. if "%~1" equ "" (goto :end)
  4. if not exist "%~dp1" (echo;Path Error&goto :end) else (cd /d "%~dp1")
  5. for /f "delims=" %%a in ("%~dp1.") do set "current=%%~nxa"
  6. echo;"%current%"
  7. if /i "%current%" equ "%newfolder%" (goto :end)
  8. set count=0&for /f %%a in ('powershell -NoProfile -ExecutionPolicy bypass "write-host ([regex]::matches(\""%current%\"",'[\u4E00-\u9FA5]')).Count;"') do set "count=%%a"
  9. echo;%count%
  10. if %count% geq 5 (goto :end)
  11. for %%a in (.wav .flac .dts .dff .mp3 .dsf .ape) do (
  12.     if exist *%%a (
  13.         md "%newfolder%" 2>nul
  14.         move /y *%%a "%newfolder%\" 2>nul
  15.     )
  16. )
  17. :end
  18. pause
  19. exit
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表