[已解决]20元求助批处理根据文本命名文件

lxh623

文件夹有很多pdf，文件名，如：bj093386431，等。
想把它命名为文本中—前面的名字。如转轮之页--收获满箩筐.pdf

文本a：（.pdf可以删除的。）
转轮之页--收获满箩筐—bj093386431.pdf
春风化雨--我们能不能选择父母—bj093386413.pdf
涌泉之歌--滚动的石头不长苔—bj093386409.pdf

自己做的不行？？？
谢谢！

1. for /f %%a in ('dir /s/b/a:d-h F:\杂志\香光庄严\') do (
   
2.         for /f  "tokens=1,* delims=—" %%b  in ('findstr "%%a"  a.txt ') do (
   
3.         ren "%%a.pdf" "%%b.pdf"
   
4.         )
   
5. )

复制代码

lxh623

具体报酬：20元人民币
支付方式：支付宝，网银转账，等。
联系方式：QQ5224956XXXX
有效期限：
题目：
http://www.bathome.net/thread-45897-1-1.html
或者麻烦把原帖转移过来。谢谢！

Batcher

test1.bat

1. @echo off
   
2. for /f %%a in ('dir /s /b /a-d "F:\杂志\香光庄严"') do (
   
3.     for /f "tokens=1,* delims=—" %%b in ('findstr "%%~nxa" a.txt') do (
   
4.         REM 如果测试没有问题，把下面的 echo 删掉再次执行即可
   
5.         echo ren "%%a.pdf" "%%b.pdf"
   
6.     )
   
7. )
   
8. pause

复制代码

test2.bat

1. @echo off
   
2. for /f %%a in ('dir /s /b /a-d "F:\杂志\香光庄严"') do (
   
3.     for /f "tokens=1,* delims=—" %%b in ('findstr "%%~nxa" a.txt') do (
   
4.         REM 如果测试没有问题，把下面的 echo 删掉再次执行即可
   
5.         echo ren "%%a" "%%b.pdf"
   
6.     )
   
7. )
   
8. pause

复制代码

lxh623

已经扫码支付。谢谢！