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

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
在这里找到解决方法

@echo off&setlocal enableDelayedExpansion

set "r=a.txt"

for /f "usebackq delims=" %%a in ("%r%") do set/a a+=1&set "#!a!=%%a"

for %%a in (*.vob) do if /i not "%%a"=="%r%" (

        set/a b+=1

        if !b! gtr %a% goto:end

        for %%b in (!b!) do (

                ren "%%a" "!#%%b!.mpg"

                set #!b!=

))

:end

(for /f "tokens=1* delims==" %%a in ('set #') do echo/%%b)>"%r%"
复制代码

CrLf

@echo off
for /f "delims=" %%a in (list.txt) do (
   set /a n+=1
   set name=%%a
   setlocal enabledelayedexpansion
   ren Part_!n!_*.vob *.vob=====!name!.vob || ren Part!n!.vob *.vob=====!name!.vob
   endlocal
)
复制代码

find

回复 2# CrLf


又玩通宵了？

WDMZ

好象处理不了
谢谢了。

WDMZ

提示；
命令语法不正确

find

回复 5# WDMZ


把完整的信息贴出来

apang

@echo off&set n=0
for %%a in (Part_14_1 Part_15_1 Part16  Part17) do call :11 "%%a"
goto :eof

:11
for /f "delims=" %%b in ('more +%n% list.txt') do (  
    ren "%~1.vob" "%~1.vob====%%b.vob"
    call set/a n+=1&goto :eof
)
复制代码

试试看

terse

@echo off
for /f "tokens=1* delims=:" %%a in ('dir /b /a-d *.vob^|findstr /n .*') do (
    for /f "tokens=1* delims=:" %%c in ('findstr /n .* list.txt') do (
        IF %%a EQU %%c echo ren "%%b" "%%b==%%d%%~xb"
    )
)
pause
复制代码

Seder

3:56  版主V5

WDMZ

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