哪位大神能帮忙解答一下以下这个问题：
如何根据指定文件名批量移动文件夹内的文件

举例：
文本文档A：文件名清单（纯数字文件名）50个文件名
文件夹B：大数据库文件（文件格式Excel）成千上万个数据
文件夹C：
根据文件A中的清单内容，批量选择文件夹B的文件，并复制到文件夹C中

@璐村惂鐢ㄦ埛_000076K馃惥 off&title BacthCopy
::路径换一下就好
for /f "delims=" %%a in (%~dp0\A.txt) do (
if exist "%~dp0\B\%%a" (
copy "%~dp0\B\%%a" "%~dp0\C" >nul
echo %~dps0\B\%%a --^> %~dps0\C
)
)
pause
下面为清单:
文件夹B里有100个文件
下面是效果

@璐村惂鐢ㄦ埛_000076K馃惥 off
for /f "delims=" %%a in (A.txt的路径) do (
if exist "文件夹B的路径\%%a" (
copy "文件夹B的路径\%%a" "%~dp0\C" >nul
echo 文件夹B的路径\%%a --^> 文件夹C的路径
)
)
pause
@鈀傷伈丟給曠壄

以下代码复制粘贴到记事本，另存为xx.bat，跟txt文件放一起双击运行（注：bat和txt文件必须存为ANSI/GB2312编码）
<# :
echo off&cls
rem 根据一个txt文本文件内列出的多个文件名，从一个指定文件夹里查找出相应的文件并剪切/移动到另一个文件夹里
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::GetEncoding('GB2312'))))"
echo;%#% +%$%%$%/%_% %z%
pause
exit
#>
$txtfile="文件名清单.txt";
$oldfolder="D:\xxx\文件夹B";
$newfolder="E:\yyy\文件夹C";
if(-not (test-path -liter $txtfile)){write-host ('"'+$txtfile+'" not found');exit;};
if(-not (test-path -liter $oldfolder)){write-host ('"'+$oldfolder+'" not found');exit;};
if(-not (test-path -liter $newfolder)){[void](md $newfolder);};
$dic=New-Object 'System.Collections.Generic.Dictionary[string,int]';
$text=[IO.File]::ReadAllLines($txtfile,[Text.Encoding]::GetEncoding('GB2312'));
for($i=0;$i -lt $text.count;$i++){
$key=$text[$i].toLower();
if(-not $dic.ContainsKey($key)){
$dic.Add($key, 0);
};
};
$files=@(dir -liter $oldfolder|?{$_ -is [System.IO.FileInfo]});
for($i=0;$i -lt $files.length;$i++){
$key1=$files[$i].Name.toLower();
$key2=$files[$i].BaseName.toLower();
if($dic.ContainsKey($key1) -or $dic.ContainsKey($key2)){
write-host $files[$i].FullName;
$newfile=$newfolder.trimend('\')+'\'+$files[$i].Name ;
move-item -liter $files[$i].FullName $newfile;
}
}

move 文件全名包括后缀 移动的文件夹名字
中间有空格的地方需要加空格，然后改成bat，应该就行吧

对啊，直接move多简单

前来参观

插个眼