Board logo

标题: [文件操作] 求助！以数字命名的文件批量重命名，新名字用老名字做加减法得来 [打印本页]
作者: luoye2010    时间: 2020-4-24 23:35     标题: 求助！以数字命名的文件批量重命名，新名字用老名字做加减法得来

文件名都是数字，如何做个批处理把所有的数字都统一加10或者减10作为新名字，比如原来的100变成110，原来的150变成160，谢谢各位大神
作者: xczxczxcz    时间: 2020-4-25 04:31

转成数字则可以数学运算了。
作者: netdzb    时间: 2020-4-25 08:35

回复 2# xczxczxcz

读入的变量是%%i怎么转数字?
作者: wujunkai    时间: 2020-4-25 11:58

回复 3# netdzb 
  1. set /A name=%%~ni+10

  2. rename %%i !name!%%~xi
复制代码
作者: netdzb    时间: 2020-4-25 12:06

回复 1# luoye2010


for /f %%i in (*.png) do (
set /A name=%%~ni+10
rename %%i !name!%%~xi
)

大概是这样的，你再改改。
作者: luoye2010    时间: 2020-4-25 12:30

各位大神能不能给个成品 小弟零基础不会改   上面两位兄台给的都试了 不行 文件名没有变动
作者: netdzb    时间: 2020-4-25 13:35

回复 4# wujunkai

发个用awk方法的脚本，这个感觉可以用awk来做。
作者: went    时间: 2020-4-25 16:48

ANSI保存,加减操作修改第6行,dir是png文件夹
  1. @echo off

  2. REM png文件所在文件夹

  3. set "dir=G:\test"

  4. for /f "delims=" %%i in ('dir /b "%dir%\*.png"') do (

  5. 	REM 加10

  6. 	set /a "newName=%%~ni+10"

  7. 	REM 重命名

  8. 	call echo %%i -- %%newName%%%%~xi

  9. 	call rename "%dir%\%%i" "%%newName%%%%~xi"

  10. 	echo ---------------------------------------

  11. )

  12. pause&exit
复制代码
作者: luoye2010    时间: 2020-4-25 17:20

楼上大神正解  已经弄好了 谢谢大神出手 感激之心无以言表 感谢 感谢
作者: zaqmlp    时间: 2020-4-25 17:26

+由大到小
-由小到大
作者: netdzb    时间: 2020-4-25 18:47

回复 9# luoye2010

我漏掉了delims,我手机发的，没有测试，汗。
作者: netdzb    时间: 2020-4-25 19:54

回复 6# luoye2010

不好意思，由于是手机，漏一个delims
耽误你时间了。
作者: WHY    时间: 2020-4-25 22:37

本帖最后由 WHY 于 2020-4-25 22:40 编辑

需先排序再重命名。
假设同时存在 120.png 和 130.png，如果不排序，120.png 重命名为 130.png 肯定失败。
  1. @echo off & setlocal enabledelayedexpansion

  2. if "%~1" EQU "ARG" (

  3.     for /f %%i in ( 'dir /b *.png ^| findstr /i /b /e "[1-9][0-9]*\.png 0\.png"') do (

  4.         set "s=0000000000%%~ni"

  5.         set /a n=%%~ni+10

  6.         echo;!s:~-10! %%i !n!

  7.     )

  8. ) else (

  9.     for /f "tokens=2,3" %%i in ('"%~f0" ARG ^| sort /r') do ren "%%i" %%j%%~xi"

  10.     pause & exit

  11. )
复制代码
作者: netdzb    时间: 2020-4-25 23:07

回复 13# WHY

这个改成awk就不用排序了。
作者: WHY    时间: 2020-4-29 14:20

回复 14# netdzb


    是谁告诉你 awk 或 gawk 不需要排序的？
作者: WHY    时间: 2020-4-29 14:22

  1. PowerShell "dir *.png | ?{$_.BaseName -match '^([1-9]\d*|0)$'} | sort -Desc {1*$_.BaseName} | ren -NewName{''+(10+$_.BaseName)+$_.Extension}"
复制代码
作者: WHY    时间: 2020-4-29 14:25

如果一定要用 gawk，可以这样：
  1. dir /b *.png | gawk "{if(match($0,/^([1-9][0-9]*|0)\.[^.]+$/,m))a[$0]=1*m[1]}END{len=asort(a,b);for(i=len;i>0;i--)system(\"cmd /c Ren \"b[i]\".png \"(b[i]+10)\".png\")}"
复制代码
作者: netdzb    时间: 2020-4-29 14:34

回复 15# WHY

感觉用awk方法代码更简洁吧，要不先搞个排序再awk一下。
能不代码贴一下吗?学习一下了。
作者: WHY    时间: 2020-5-4 16:21

回复 18# netdzb


    17楼的脚本你认为不是 gawk 吗？
作者: WHY    时间: 2020-5-4 16:26

GNU sort
  1. dir /b *.png | sort -n -r | gawk "{ if( match($0,/^([1-9][0-9]*|0)(\.[^.]+)$/,m) ) print $0, (m[1]+10)m[2] }"
复制代码




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2