求助批处理如何根据txt列表模糊查找源文件夹目录然后移动到带源路径的新目标目录？

fang139842 · 发表于 2023-1-16 23:30:56

各位大佬
请问一下如何根据txt文件内的列表模糊查找源文件夹目录然后移动到带源路径的新目标目录
如：已有一个列表.txt文件里面有

nihao.txt
wenjian
ceshi.jpg

rem 其中wenjian是不带后缀的可以复制任何后缀的出去

源目录结构是下面这样的：
源目录\A\B\nihao.txt
源目录\A\C\wenjian.txt
源目录\A\C\wenjian.jpg
源目录\A\D\ceshi.jpg

源目录的复制到目标目录后是这样的：
目标目录\A\B\nihao.txt
目标目录\A\C\wenjian.txt
目标目录\A\C\wenjian.jpg
目标目录\A\D\ceshi.jpg

小弟在跪谢过各位大佬！！

qixiaobin0715 · 发表于 2023-1-17 10:15:56

本帖最后由 qixiaobin0715 于 2023-1-17 10:57 编辑

回复 1# fang139842
1.批处理文件与文件名列表文件list.txt放在同一目录；
2.假设源文件目录为：D:\abc；目标目录为：D:\123；
3.批处理文件与列表文件均存为ANSI编码：

@echo off
set SourceFolder=D:\abc
set TargetFolder=D:\123
setlocal enabledelayedexpansion
for /f "delims=" %%a in (list.txt) do (
cd /d "%SourceFolder%"
if "%%~xa"=="" (
for /f "delims=" %%i in ('dir /b /s /a-d "%%a.*"') do (
set str=%%~dpi
md "%TargetFolder%!str:%cd%=!">nul 2>nul
copy "%%i" "%TargetFolder%!str:%cd%=!">nul 2>nul
) else (
for /f "delims=" %%i in ('dir /b /s /a-d "%%a"') do (
set str=%%~dpi
md "%TargetFolder%!str:%cd%=!">nul 2>nul
copy "%%i" "%TargetFolder%!str:%cd%=!">nul 2>nul
)
)
)
pause

复制代码

代码未经测试。

qixiaobin0715 · 发表于 2023-1-17 10:55:50

本帖最后由 qixiaobin0715 于 2023-1-17 10:56 编辑

简化以上代码：

@echo off
set SourceFolder=D:\abc
set TargetFolder=D:\123
setlocal enabledelayedexpansion
for /f "delims=" %%a in (list.txt) do (
cd /d "%SourceFolder%"
if "%%~xa"=="" (
set "str=%%a.*"
) else (
set "str=%%a"
)
for /f "delims=" %%i in ('dir /b /s /a-d "!str!"') do (
set str=%%~dpi
md "%TargetFolder%!str:%cd%=!">nul 2>nul
copy "%%i" "%TargetFolder%!str:%cd%=!">nul 2>nul
)
)
pause

复制代码

fang139842 · 发表于 2023-1-17 13:02:54

回复 3# qixiaobin0715

大哥威武大哥牛逼对大哥敬仰佩服的五体投地

terse · 发表于 2023-1-18 20:33:48

xcopy可以

@echo off & setlocal enabledelayedexpansion
rem 保存为ANSI格式
set "source=d:\123\"
set "destination=d:\abc\"
for /f "delims=" %%a in (list.txt) do (
if "%%~xa"=="" ( set "str=%%a.*" ) else set "str=%%a"
for /f "delims=" %%i in ('dir /b /s /a-d "%source%!str!"') do (
set "ph=%%~dpi"
xcopy /y "%%i" "%destination%!ph:*%source%=!" >nul
)
)
pause

复制代码

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文件操作] 求助批处理如何根据txt列表模糊查找源文件夹目录然后移动到带源路径的新目标目录？