[文件操作] 引用记事本内容批量更改绝对路径的文件名

xidhgood

求助大神：
我有一些文件，文件名是：1.pdf、2.pdf、3.pdf。。。的PDF文件，我想用一个批处理以记事本内容来批量修改这些文件名
记事本内容如下：
1|01-测试文件_C01
2|02-测试文件_M01
3|03-测试文件_Q01
4|04-测试文件_M02
5|05-测试文件_C02

就是我修改了该记事本（比如叫：明细.txt），然后运行该批处理
这里我这些1.pdf、2.pdf、3.pdf。。。文件是在一个固定的绝对路径下的，比如在桌面建个PDF的文件夹：d:\Users\joy\Desktop\PDF
但是我的批处理文件并不是放在这个文件夹内，我可能放在E盘或者其它地方（比如：E\test），我的记事本可以跟批处理放在一起（或者也放另一个固定的目录下，但是我不会跟桌面那个放一起）；

zaqmlp

@echo off
set info=互助互利,支付宝扫码头像,感谢赞助
rem 有问题,可加QQ956535081及时沟通
title %info%
start mshta VBScript:Execute("msgbox(""%info%""):close")
cd /d "%~dp0"

set "文件夹=d:\Users\joy\Desktop\PDF"
set "文本=明细.txt"
rem txt跟bat放一起

for /f "delims=" %%a in ('dir /a-d/b/s "%文件夹%\*.pdf"') do (
    call :loop "%%a"
)
pause&exit
:loop
for /f "tokens=1* delims=|" %%b in ('type "%文本%"') do (
    if "%%b" equ "%~n1" (
        echo;"%~1" --^> "%%c%~x1"
        ren "%~1" "%%c%~x1"
        exit /b
    )
)
goto :eof
复制代码

xidhgood

回复 2# zaqmlp


    非常感谢！！！！