[文本处理] 求助文件重命名换顺序的批处理

haichuan5121

一堆图片命名格式A-B-C-D  怎么能实现变成A-C-B-D啊；
log_0588_2514_1_004.jpg变成 log_2514_0588_1_004.jpg 俩横线中间的数字位数不一样

went

回复 17# haichuan5121

放到jpg文件夹中运行,重命名当前文件夹中的jpg文件

@echo off
REM key-value
set "keys=AB:CF CD:JH VC:BG"
for /f "delims=" %%i in ('dir /b "*.jpg"') do (
	echo %%i
	set "file=?%%~i"
	REM delims=后面是A与BCD之间的分隔符(-_)支持多个
	for /f "tokens=1 delims=-_" %%a in ("%%~i") do (
		set "A=%%a"
		for %%a in (%keys%) do (
			for /f "tokens=1-2 delims=:" %%b in ("%%a") do (
				call set "A=%%A:%%b=%%c%%"
			)
		)
		call :replace "?%%a" "%%A%%"
	)
	call echo %%file%%
	REM call rename "%%~i" "%%file%%" && echo 成功! || echo 失败!
	echo -----------------------
)
echo 完成!
pause&exit
:replace
call set "file=%%file:%~1=%~2%%"
复制代码

haichuan5121

回复 16# went


1bslhd125aAB_2514_0588_1_004.jpg 不成功1bslhd125aAB_2514_0588_1_004-副本.jpg成功转成1bslhd125aCF_2514_0588_1_004-副本.jpg   
顺道改成放文件夹点击不需要改绝对地址那种

went

回复 15# haichuan5121


不成功图片完整的文件名能发出来下吗,

haichuan5121

回复 12# went


    文件夹下原文件实验不成功，但是复制成副本就全部成功了，A_B_C_D.JPG 不成功，A_B_C_D-副本.jpg就OK呢，是分隔符不适用么

went

回复 13# went


别用这种,发现有bug
t00001.txt会替换成chd001.txt
类似占位符替换,不过这种应该有其它用处

went

回复 3# netdzb

rename t*.txt chd*.txt
复制代码

went

批量替换,ANSI保存,先测试再删掉15行的REM

@echo off
REM dir
set "dir=C:\Users\lenovo\Desktop\0"
REM key-value
set "keys=AB:CF CD:JH VC:BG"
for /f "tokens=1* delims=-" %%i in ('dir /b "%dir%\*.jpg"') do (
	echo %dir%\%%i-%%j
	call set "fileName=%%i"
	for %%a in (%keys%) do (
		for /f "tokens=1-2 delims=:" %%b in ("%%a") do (
			call set "fileName=%%fileName:%%b=%%c%%"
		)
	)
	call echo %%fileName%%-%%j
	REM call rename "%dir%\%%i-%%j" "%%fileName%%-%%j" && echo 成功! || echo 失败!
	echo ---------------
)
echo 完成!
pause&exit
复制代码

haichuan5121

回复 9# went

名字没有空格后两位互换
    1ABC DE-----1ABC ED
    1ABC CF------1ABC FC
或者高级需求；约50个组合可自定义指定替换内容
如指定 CF 替换为HG  CV 替换为CA后效果
   1ABC CF----1ABC HG
   1ABC CV---1ABC CA

haichuan5121

回复 9# went


    只huan A 就行

went

回复 4# haichuan5121


    批量替换是只换A还是A-B-C-D都换

haichuan5121

能帮我这个看看怎么改吗
回复 7# wujunkai

wujunkai

回复 6# haichuan5121


    哦这个是给3楼的。。。

haichuan5121

回复 5# wujunkai


    没成功，文件名1BCDLM-B-C-D.JPG  改成1BCDML-B-C-D     其中前六位字母是随机的 所以不能指定更改替换字符；需要按位数替换；

或者大神帮忙写个更高级的方式；批量查找替换   AB换成CF   CD换成JH  VC换成BG  共大约几十个组合，这两位小白可以单独修改后查找替换；

wujunkai

回复 3# netdzb

@echo off & setlocal enabledelayedexpansion

rem 在这里设置替换的字符串
set "from=doc"
set "to=AAA"

:main
    for /R %%i in (*.*) do (
        set "file=%%~nxi"
        if not "!file!"=="!file:%from%=%to%!" rename "%%~dpi!file!" "%%~dpi!file:%from%=%to%!"
        
    )
    pause
goto:eof
复制代码

已知bug：会波及到文件扩展名。。。
我先考试，考完再修