求改个批处理，增加替换文件名中特定字符的功能

anszboy

请热心的坛友帮改个bat，增加批量替换文件名中特定字符的功能，比如文件名中的"_生产周报"，替换为"_第六车间简报"；
不要另外单独写个bat,请在原命令中增加语句，另外不要提示输入，需要替换的内容直接写死，点击后直接运行。先谢谢了！！


原来的命令如下：

1. @echo off & title 以当前批处理文件所在位置的层级为根目录，移动所有下级子目录里的所有文件到根目录,并对指定类型文件增加文件夹命名的前缀，最后删除空文件夹。 警告：会覆盖同名文件
   
2. for /f "delims=" %%a in ('dir /a-d /b /s ') do (move "%%~a" ./)
   
3. for /f "tokens=*" %%i in ('dir/s/b/ad^|sort /r') do rd "%%i"
   
4. rem 获取当前文件夹名
   
5. set str=%~p0
   
6. set str=%str:~,-1%&call :lp
   
7. rem 更名
   
8. for /f "delims=" %%i in ('dir /a-d /b *.xls') do (
   
9. ren "%%i" %var%"#"%%i
   
10. )
    
11. echo 搞定!&pause>nul&goto :eof
    
12. :lp
    
13. if "%str:~-1%" equ "" goto :eof
    
14. set a=%str:~-1%
    
15. set var=%a%%var%&set str=%str:~,-1%&goto lp

复制代码

qixiaobin0715

回复 1# anszboy
重新写一个批处理，用你的批处理处理好文件后，将下面代码放在文件所在目录运行：

1. @echo off
   
2. set /p str1=请输入替换前的字符：
   
3. set /p str2=请输入替换后的字符：
   
4. setlocal enabledelayedexpansion
   
5. for %%a in ("*%str1%*.xls") do (
   
6.     set "var=%%a"
   
7.     ren "%%a" "!var:%str1%=%str2%!"
   
8. )
   
9. pause

复制代码

anszboy

回复 2# qixiaobin0715
最好能整合到一起，你写的网上有现成的，我就是不知如何整合，才发帖求助

Batcher

回复 1# anszboy


试试这样可以吗

1. @echo off
   
2. title 以当前批处理文件所在位置的层级为根目录，移动所有下级子目录里的所有文件到根目录,并对指定类型文件增加文件夹命名的前缀，最后删除空文件夹。 警告：会覆盖同名文件
   
3. setlocal enabledelayedexpansion
   
4. for /f "delims=" %%a in ('dir /a-d /b /s') do (move "%%~a" ./)
   
5. for /f "tokens=*" %%i in ('dir/s/b/ad^|sort /r') do rd "%%i"
   
6. rem 获取当前文件夹名
   
7. set str=%~p0
   
8. set str=%str:~,-1%
   
9. call :lp
   
10. rem 更名
    
11. for /f "delims=" %%i in ('dir /a-d /b *.xls') do (
    
12.     set "NewName=%var%#%%i"
    
13.     set "NewName=!NewName:_生产周报=_第六车间简报!"
    
14.     ren "%%i" "!NewName!"
    
15. )
    
16. echo 搞定
    
17. pause
    
18. goto :eof
    
19. 
    
20. :lp
    
21. if "%str:~-1%" equ "" goto :eof
    
22. set a=%str:~-1%
    
23. set var=%a%%var%
    
24. set str=%str:~,-1%
    
25. goto :lp

复制代码

anszboy

回复 4# Batcher


    谢谢老大，可以了，3Q艾瑞玛曲！！