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

[文件操作] [已解决]批处理如何根据列表文件查找并复制文件?

本帖最后由 tanrr 于 2018-8-27 10:11 编辑

根据文本文件1.txt,该文件每行是一个文件名(不含扩展名),如下所示:
rink
bang
nine
hkjgkljkhkgj
jfkjgklhkglkjl

查找指定文件夹e:/2(一定要包括子文件夹)下匹配的文件(完全匹配,不区分大小写),如果找到:
1.将找到的文件复制到指定文件夹e:/3和d:/3
2.将找到的文件的文件名写入4.txt,格式为每行“文件名”+空格+“[sound:_文件名.扩展名]”,未找到的文件不写入,如下所示:
rink [sound:_rink.mp3]
bang [sound:_bang.mp3]
nine [sound:_nine.wav]

最后显示总查找条数,找到条数,未找到条数。

文本文件编码UTF-8。
请问如何才能实现?
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

回复 5# Batcher
已用4楼代码完美解决,谢谢!

TOP

回复 4# xczxczxcz
厉害了!运行速度飞快,而且资源占用小,非常感谢!

TOP

回复 3# tanrr


    如果不想查找,那就需要在1.txt里面列出文件的完成路径和文件名,否则代码不知道从哪里复制文件。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 3# tanrr

文件夹嵌套太深,文件数量太多,文件容量又不大,十几万个小文件,就是用最简单的复制粘贴命令也不会很快。用批程式,总是要检索你的1.txt 和层层目录下的文件。偶是找不到更快的方法。就算以1.txt内的条目来检索目录也是花好多时间的。看VBS 和 powershell有没有好办法。
下面这个按 1.txt 内容依次查找 e:\2目录。偶用系统盘测试也不快。程式如下:
  1. @echo off & setlocal EnableDelayedExpansion
  2. cd/d "%~dp0"
  3. pushd "%~dp0"
  4. for /f "delims=" %%a in ('type 1.txt') do (
  5.    set "name="
  6.    set /a total+=1
  7.    for /f "delims=" %%e in ('dir/a-d/b/s "e:\2\%%a.*"') do (
  8.       pushd "%%~dpe"
  9.       if "%%~xe" neq "" if /i exist "%%~nxe" (
  10.         set /a num+=1
  11.         set "name=true"
  12.         echo 复制 %%~nxe  到 [e:\3] && copy /y "%%~nxe" "e:\3">nul 2>&1
  13.         echo 复制 %%~nxe  到 [d:\4] && copy /y "%%~nxe" "d:\4">nul 2>&1
  14.         echo %%~ne [sound:_%%~nxe]>>"%~dp04.txt")
  15.         popd
  16.         )
  17.    if not defined name set /a number+=1
  18.    )
  19. echo. & echo 总查找[%total%]条, 找到[%num%]条, 未找到[%number%]条。
  20. pause
复制代码
1

评分人数

TOP

回复 2# xczxczxcz

果真是大神,一次就运行成功,非常感谢!
不过有个问题,因为源文件夹e:/2/里面有10万多个文件,导致查找速度极慢,看来查找这个方案是不行的。

不知以下这个直接复制的方案是否可行:

有一个文本文件1.txt,该文件每行是一个文件名(不含扩展名),如下所示:
rink
bang
nine
hkjgkljkhkgj

1.不查找,直接根据1.txt将相应文件复制到目标文件夹e:/3和d:/4,显示复制总数、成功、失败的数目。

2.将复制失败的文件以及复制总数、成功、失败的数目写入3.txt,复制成功的不用写入。

3.根据生成的目标文件夹e:/3,将文件列表写入4.txt,格式为每行“文件名”+空格+“[sound:_文件名.扩展名]”,如下所示:
rink [sound:_rink.wav]
bang [sound:_bang.wav]
nine [sound:_nine.wav]

TOP

没人回复?
  1. @echo off & setlocal EnableDelayedExpansion
  2. cd.>4.txt
  3. for /f "delims=" %%a in ('dir/a-d/b/s "e:\2"') do (
  4.     set /a total+=1
  5.     findstr /i /x /c:"%%~na" "1.txt">nul 2>nul&&(
  6.        set /a num+=1
  7.        set/p=复制 %%~nxa 到 [e:\3]目录<nul & (copy /y "%%a" "e:\3\">nul 2>nul && echo 成功 || echo 失败)
  8.        set/p=复制 %%~nxa 到 [d:\4]目录<nul & (copy /y "%%a" "d:\4\">nul 2>nul && echo 成功 || echo 失败)
  9.        echo %%~na [sound:_%%~na%%~xa]>>4.txt
  10.     ) || set /a number+=1)
  11. echo. & echo 总查找[%total%]条, 找到[%num%]条, 未找到[%number%]条。
  12. pause
复制代码
=============================================

TOP

返回列表