@echo off
rem 根据一个txt文本文件里列出的文件或文件夹的名称清单，将多个文件或文件夹从一个文件夹里复制到另一个新的文件夹里
title %#% +%$%%$%/%@% %z%
cd /G "%~dp0"
set "txtfile=名称清单.txt"
set "oldfolder=E:\宗地图"
set "newfolder=E:\发证"
if not exist "%txtfile%" (echo;"%txtfile%" no found&goto end)
if not exist "%oldfolder%" (echo;"%oldfolder%" no found&goto end)
if not exist "%newfolder%" md "%newfolder%"
for /f "delims=" %%a in ('type "%txtfile%"') do (
    set "f="
    if exist "%oldfolder%\%%a\" (
        set f=1
        echo;"%oldfolder%\%%a" --^> "%newfolder%\%%a\"
        xcopy "%oldfolder%\%%a" "%newfolder%\%%a\" /e /h /y /q
    ) else (
        if exist "%oldfolder%\%%a" (
            set f=1
            echo;"%oldfolder%\%%a" --^> "%newfolder%\"
            copy /y "%oldfolder%\%%a" "%newfolder%\"
        )
    )
    if not defined f (echo;[not found]"%%a")
)
:end
echo;%#% +%$%%$%/%@% %z%
pause
exit
复制代码