[已解决]批处理给不同名字的文件重命名

WDMZ

给不同名字的文件重命名。。
Part_14_1.vob
Part_15_1.vob
Part16.vob
Part17.vob
在文本引用给文件重命名
文本的内容；
周艳泓-当爱情经过的时候
辛晓琪-领悟
李晓杰-朋友的酒
郑源-包容
-----------------------------重命名后

Part_14_1.vob====周艳泓-当爱情经过的时候.vob

Part_15_1.vob==== 辛晓琪-领悟.vob

Part16.vob====== 李晓杰-朋友的酒.vob

Part17.vob=====郑源-包容.vob

谢谢了

http://www.bathome.net/viewthread.php?tid=10830
在这里找到解决方法

1. @echo off&setlocal enableDelayedExpansion
   
2. 
   
3. set "r=a.txt"
   
4. 
   
5. for /f "usebackq delims=" %%a in ("%r%") do set/a a+=1&set "#!a!=%%a"
   
6. 
   
7. for %%a in (*.vob) do if /i not "%%a"=="%r%" (
   
8. 
   
9.         set/a b+=1
   
10. 
    
11.         if !b! gtr %a% goto:end
    
12. 
    
13.         for %%b in (!b!) do (
    
14. 
    
15.                 ren "%%a" "!#%%b!.mpg"
    
16. 
    
17.                 set #!b!=
    
18. 
    
19. ))
    
20. 
    
21. :end
    
22. 
    
23. (for /f "tokens=1* delims==" %%a in ('set #') do echo/%%b)>"%r%"
    
24. 
    

复制代码

CrLf

1. @echo off
   
2. for /f "delims=" %%a in (list.txt) do (
   
3.    set /a n+=1
   
4.    set name=%%a
   
5.    setlocal enabledelayedexpansion
   
6.    ren Part_!n!_*.vob *.vob=====!name!.vob || ren Part!n!.vob *.vob=====!name!.vob
   
7.    endlocal
   
8. )

复制代码

find

回复 2# CrLf


又玩通宵了？

WDMZ

好象处理不了
谢谢了。

WDMZ

提示；
命令语法不正确

find

回复 5# WDMZ


把完整的信息贴出来

apang

1. @echo off&set n=0
   
2. for %%a in (Part_14_1 Part_15_1 Part16  Part17) do call :11 "%%a"
   
3. goto :eof
   
4. 
   
5. :11
   
6. for /f "delims=" %%b in ('more +%n% list.txt') do (  
   
7.     ren "%~1.vob" "%~1.vob====%%b.vob"
   
8.     call set/a n+=1&goto :eof
   
9. )

复制代码

试试看

terse

1. 
   
2. @echo off
   
3. for /f "tokens=1* delims=:" %%a in ('dir /b /a-d *.vob^|findstr /n .*') do (
   
4.     for /f "tokens=1* delims=:" %%c in ('findstr /n .* list.txt') do (
   
5.         IF %%a EQU %%c echo ren "%%b" "%%b==%%d%%~xb"
   
6.     )
   
7. )
   
8. pause
   

复制代码

Seder

3:56  版主V5

WDMZ

http://www.bathome.net/viewthread.php?tid=10830
在这里找到答案了。谢谢各位高手帮忙