[文件操作] 批处理含多级子文件夹内的指定格式文件复制到新文件夹

@echo off
set "src=E:\A"
set "dst=E:\B"
cd "%src%"
for /f "delims=" %%a in ('dir /s /b /ad') do (
    pushd "%%a"
    if exist *.xls (
        for /f "delims=" %%b in ('dir /b /a-d *.xls') do (
            copy "%%b" "%dst%\%%~nxa_%%b"
        )
    )
    popd
)
pause
复制代码

@echo off
set "src=E:\A"
set "dst=E:\B"
move "%dst%\*_*.xls" "%src%\"
cd "%src%"
for /f "tokens=1* delims=_" %%a in ('dir /b /a-d *_*.xls') do (
    for /f "delims=" %%i in ('dir /b /s /ad "%%a"') do (
        move "%%a_%%b" "%%i\"
    )
)
pause
复制代码

@echo off

set "src=E:\A"
set "dst=E:\B"
set s=_

for /r "%src%" %%a in ("*.xls") do (
set file=%%a
setlocal enabledelayedexpansion
set file2=!file:~3!
set file2=!file2:\=%s%!
copy /y "!file!" "!dst!\!file2!" 
endlocal
)
pause
复制代码

@echo off

set "src=E:\A"
set "dst=E:\B"
set s=_

for %%a in ("%dst%\*.xls") do (
set file=%%~nxa
setlocal enabledelayedexpansion
set srcd=!src:~0,3!
set srcp=!file:%s%=\!
copy /y "!dst!\!file!" "!srcd!!srcp!"
endlocal
)
pause
复制代码