level 1
我已_痴心绝对
楼主
如题，我在网上找了一个但是不起效果
如下
@璐村惂鐢ㄦ埛_000076K馃惥 off&cd /d "%~dp0"
rem 根据一个txt文本文件内列出的文件名称前缀字符，从一个指定目录里查找出符合条件的子文件夹并拷贝/复制到另一个指定目录里
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
set "oldfolder=原文件夹路径"
set "newfolder=指定文件夹路径"
set "txtfille=list.txt"
if not exist "%oldfolder%" (echo;"%oldfolder%" 未找到&pause&exit)
if not exist "%newfolder%" md "%newfolder%"
if not exist "%txtfille%" (echo;"%txtfille%" 未找到&pause&exit)
if "%oldfolder:~-1%" equ "\" set "oldfolder=%oldfolder:~,-1%"
if "%newfolder:~-1%" equ "\" set "newfolder=%newfolder:~,-1%"
for /f "delims=" %%a in ('type "%txtfille%"') do (
for /f "delims=" %%b in ('dir /ad-h/b "%oldfolder%\%%a_*" 2^>nul') do (
echo;"%oldfolder%\%%~nxb" --^> "%newfolder%"
)
)
echo;%#% +%$%%$%/%_% %z%
pause
exit
2022年04月24日 20点04分
1
如下
@璐村惂鐢ㄦ埛_000076K馃惥 off&cd /d "%~dp0"
rem 根据一个txt文本文件内列出的文件名称前缀字符，从一个指定目录里查找出符合条件的子文件夹并拷贝/复制到另一个指定目录里
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
set "oldfolder=原文件夹路径"
set "newfolder=指定文件夹路径"
set "txtfille=list.txt"
if not exist "%oldfolder%" (echo;"%oldfolder%" 未找到&pause&exit)
if not exist "%newfolder%" md "%newfolder%"
if not exist "%txtfille%" (echo;"%txtfille%" 未找到&pause&exit)
if "%oldfolder:~-1%" equ "\" set "oldfolder=%oldfolder:~,-1%"
if "%newfolder:~-1%" equ "\" set "newfolder=%newfolder:~,-1%"
for /f "delims=" %%a in ('type "%txtfille%"') do (
for /f "delims=" %%b in ('dir /ad-h/b "%oldfolder%\%%a_*" 2^>nul') do (
echo;"%oldfolder%\%%~nxb" --^> "%newfolder%"
)
)
echo;%#% +%$%%$%/%_% %z%
pause
exit
