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

[文本处理] [已解决]批处理如何删除 文件夹名中 第一个连续数字之后的部分?

本帖最后由 gddsssko 于 2024-6-9 08:44 编辑

只保留第一个连续数字之前的内容,在这之后的全部内容(数字,汉字,符号等)删除
     原文件名:内容"第一个连续数字"内容
     处理后:内容"第一个连续数字"
例如:
    原文件夹名
     Zhang-San12345你好世界123@#¥
     你好12345#¥#123ABC123
     AA$A256--345$356
     大大11A大大AAA11
   处理后文件夹名
     Zhang-San12345
     你好12345
     AA$A256
     大大11


给一个不用延迟变量也不用for分割器的版本...
  1. @echo off &for /f "delims=" %%d in ('dir /b/ad') do (
  2. set "s=%%d" &set "d=%%d" &set "_s="
  3. (call :gets#) & (call :get#s)
  4. )
  5. pause&exit/b
  6. :gets#
  7. set "c=%s:~,1%"
  8. if "%c%" geq "0" if "%c%" leq "9" exit/b
  9. set "_s=%_s%%c%" &set "s=%s:~1%" &goto :gets#
  10. exit/b
  11. :get#s
  12. set "c=%s:~,1%"
  13. if "%c%" geq "0" if "%c%" leq "9" (call set "_s=%%_s%%%%c%%" &call set "s=%%s:~1%%" &goto :get#s)
  14. ren "%d%" "%_s%" 2>nul
  15. exit/b
复制代码

TOP

本帖最后由 77七 于 2024-6-9 14:56 编辑

回复 13# qixiaobin0715


   谢谢大佬指点!
我思路不严谨,没有考虑到数字后部分与数字前部分出现 相同可能。修改为以下代码,手动添加 |字符,防止重复。
  1. @echo off
  2. cd /d "%~dp0"
  3. for /f "delims=" %%d in ('dir /b /ad') do (
  4.         for /f "tokens=1* delims=0123456789" %%a in ("#%%d|") do (
  5.                 set name=%%d
  6.                 setlocal enabledelayedexpansion
  7.                 set "_name=!name!|"
  8.                 ren "!name!" "!_name:%%b=!"
  9.                 endlocal
  10.         )
  11. )
  12. pause
复制代码
再添加一个判断,防止误伤没有数字的文件夹
  1. @echo off
  2. cd /d "%~dp0"
  3. for /f "delims=" %%d in ('dir /b /ad') do (
  4. for /f "tokens=1* delims=0123456789" %%a in ("#%%d|") do (
  5. set name=%%d
  6. if "%%b" neq "" (
  7. setlocal enabledelayedexpansion
  8. set "_name=!name!|"
  9. ren "!name!" "!_name:%%b=!"
  10. endlocal
  11. )
  12. )
  13. )
  14. pause
复制代码
bat小白,请多指教!谢谢!

TOP

本帖最后由 qixiaobin0715 于 2024-6-9 14:23 编辑

回复 10# 77七
重新看了看你的代码,为防止文件夹名出现类似这种情况(abc123c),在你的代码基础上这样修改,可能更严谨些:
  1. @echo off
  2. cd /d "%~dp0"
  3. for /f "delims=" %%d in ('dir /b /ad') do (
  4. for /f "tokens=1* delims=0123456789" %%a in ("#%%d") do (
  5. setlocal enabledelayedexpansion
  6. set n1=%%a
  7. set n1=!n1:~1!
  8. set n2=#%%d
  9. set n2=!n2:*%%a=!
  10. set n2=!n2:%%b=!
  11. ren "%%d" "!n1!!n2!"
  12. endlocal
  13. )
  14. )
  15. pause
复制代码
1

评分人数

    • 77七: 感谢分享技术 + 1

TOP

回复 1# gddsssko

此类问题俺一般将其归属到文本处理问题,习惯上借助gawk( http://bcn.bathome.net/tool/4.1.0/gawk.exe )来解决:
  1. @echo off
  2. rem 建议保存为ANSI编码格式
  3. for /f "delims=" %%a in ('dir /b /s /a-d') do (
  4. for /f "delims=" %%b in ('echo;%%~na^|gawk -v"FPAT=^[^0-9]*[0-9]+" "{print $1}"') do (
  5. ren "%%a" "%%b%%~xa"
  6. )
  7. )
复制代码

TOP

回复 10# 77七


    感谢大佬

TOP

本帖最后由 77七 于 2024-3-5 10:16 编辑
  1. @echo off
  2. cd /d "%~dp0"
  3. for /f "delims=" %%d in ('dir /b /ad') do (
  4. for /f "tokens=1* delims=0123456789" %%a in ("#%%d") do (
  5. set name=%%d
  6. setlocal enabledelayedexpansion
  7. ren "!name!" "!name:%%b=!"
  8. endlocal
  9. )
  10. )
  11. pause
复制代码
2

评分人数

bat小白,请多指教!谢谢!

TOP

回复 6# ShowCode


   是我之前对于需求描述不准确,让大佬会错意了

TOP

回复 7# 77七


    算

TOP

1个数字的情况呢?算连续数字吗?
bat小白,请多指教!谢谢!

TOP

回复 5# gddsssko


4楼代码是按照你最初的例子写的。
现在需求变了,代码也需要变。
测试代码之前请做好备份

TOP

回复 4# ShowCode


    大佬,我试了后只改了部分名字,我修改了下举例,第一个和第四个例子都没反应

TOP

回复 1# gddsssko
  1. @echo off
  2. for /f "delims=" %%i in ('dir /b /ad ^| findstr ".*-.*-"') do (
  3.     set "OldName=%%i"
  4.     setlocal enabledelayedexpansion
  5.     for /f "tokens=1,2,* delims=-" %%a in ("!OldName!") do (
  6.         echo "!OldName!" -^> "%%a---%%b"
  7.         ren "!OldName!" "%%a---%%b"
  8.     )
  9.     endlocal
  10. )
  11. pause
复制代码
测试代码之前请做好备份

TOP

回复 2# wanghan519


    我试了下,好像没有反应

TOP

本帖最后由 wanghan519 于 2024-3-5 10:43 编辑

需要存入bat,放到目录同一级运行
  1. #&cls&powershell "type '%~0'|out-string|iex"&pause&exit
  2. dir -Directory | Rename-Item -NewName {$_.Name -replace '(-\d+)-.*$','$1'}
复制代码

TOP

返回列表