Board logo

标题: [文件操作] [已解决]批处理按文件列表删除未包含的文件 [打印本页]

作者: maghreb    时间: 2023-4-27 08:43     标题: [已解决]批处理按文件列表删除未包含的文件

背景:
在当前目录下分别有如下文件
aaa\111.txt
aaa\222.txt
aaa\bbb\333.xyz
aaa\bbb\ddd\444.txt

在当前目录下有list.txt内容如下:
111.txt
bbb\333.xyz

请教:
如何删除list.txt列表之外的aaa文件夹(含子文件夹)下的文件?即删除不包含在此列表中的所有文件,谢谢
作者: qixiaobin0715    时间: 2023-4-27 09:41

当前目录中也应当有list.txt吧:
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. set "_list.txt=true"
  4. for /f "delims=" %%i in (list.txt) do set "_%%i=true"
  5. for /f "delims=" %%i in ('dir /b /s /a-d *.txt') do (
  6.     set "str=%%i"
  7.     set "str=!str:%~dp0=!"
  8.     if not defined _!str! del %%i
  9. )
  10. pause
复制代码
未测试
作者: maghreb    时间: 2023-4-27 10:33

回复 2# qixiaobin0715

是的,根据当前目录下的列表文件内容保留不删文件

大侠,测试了一下,结果是aaa文件夹下的文件全删了,没保留到LIST里应该保留的文件
作者: qixiaobin0715    时间: 2023-4-27 12:56

回复 3# maghreb
你把测试出问题的文件夹打包传到网盘上,帮你测试一下看。
作者: buyiyang    时间: 2023-4-27 13:18

回复 2# qixiaobin0715


    他说的当前目录可能不是指aaa目录
作者: qixiaobin0715    时间: 2023-4-27 13:27

非要靠猜不可?
作者: me78777    时间: 2023-4-27 13:41

@echo off
rem 此bat在当前目录下
for /f %%i in ( list.txt ) do (
dir /b /s | findstr %%i >>temp.txt
)
for /f %%j in ( temp.txt ) do attrib +r %%j
del /s /q aaa\
for /f %%j in ( temp.txt ) do attrib -r %%j

pause
作者: maghreb    时间: 2023-4-27 15:24

本帖最后由 maghreb 于 2023-4-27 15:35 编辑
回复  maghreb
你把测试出问题的文件夹打包传到网盘上,帮你测试一下看。
qixiaobin0715 发表于 2023-4-27 12:56



    不好意思大侠,我这边无论是什么格式的文件都没办法上传上来,不知道论坛是怎么回事

大概是这样的:
1、在当前目录下,有N个文件夹(包含子文件夹),但有一个aaa文件夹;
2、每个文件夹下的文件数量不明,文件格式不明;
3、当前目录下,也就是和aaa文件夹同目录下,放置批处理文件和list.txt文件;
4、list列表里内容格式如下:
aaa\111.txt
aaa\bbb\222.txt
aaa\bbb\333.xyz
...
5、删除aaa文件夹下(注意当前目录还有其他文件夹),未列出在list列表里的所有文件;

简洁点说,就是按列表内容,删除指定文件夹里面未包含在列表里的所有文件
很多都是按列表删除文件,我这个刚好相反,是保留列表里所列的文件
作者: maghreb    时间: 2023-4-27 18:26

当前目录中也应当有list.txt吧:未测试
qixiaobin0715 发表于 2023-4-27 09:41


大佬,能帮我再看看不,非常感谢
作者: czjt1234    时间: 2023-4-27 18:37

回复 9# maghreb


    7楼发的试过没?
作者: maghreb    时间: 2023-4-27 19:00

本帖最后由 maghreb 于 2023-4-27 20:04 编辑
回复  maghreb


    7楼发的试过没?
czjt1234 发表于 2023-4-27 18:37



感谢,试过了,没按列表保留下来文件,是全删了

我刚弄出来了,如下:
  1. @echo on&setlocal enabledelayedexpansion
  2. pushd %~dp0
  3. for /f "delims=" %%a in ('dir/ad/s/b "%cd%\aaa\*"') do (find /i list.txt "!%%a!" || rd /s /q !%%a!) >nul 2>nul
  4. for /r "%cd%\aaa" %%a in (*.*) do (find /i list.txt "!%%a!" || del /s /q !%%a!)
  5. pause
复制代码
感谢各位大佬的帮忙
作者: buyiyang    时间: 2023-4-27 20:17

回复 11# maghreb


你确定你这个代码可行?
二楼代码第七行改一下试试
  1. set "str=!str:%~dp0aaa\=!"
复制代码

作者: 77七    时间: 2023-4-27 20:18

回复 11# maghreb


   试试这样吧
  1. @echo off
  2. pushd aaa
  3. for /f "delims=" %%a in ('type "%~dp0list.txt"') do (
  4. set #"%%~fa"=1
  5. )
  6. for /f "delims=" %%a in ('dir /b /s /a-d') do (
  7. if not defined #"%%~fa" (
  8. del "%%a"
  9. )
  10. )
  11. pause
复制代码

作者: 77七    时间: 2023-4-27 20:20

回复 7# me78777


   修改了一下
  1. @echo off
  2. for /f "delims=" %%i in (list.txt) do (
  3. dir /b /s /a-d "aaa\*"|findstr /ic:"%%i" >>temp.txt
  4. )
  5. for /f "delims=" %%j in (temp.txt) do attrib +r "%%j"
  6. del /s /q /a:-r aaa\
  7. for /f "delims=" %%j in (temp.txt) do attrib -r "%%j"
  8. del temp.txt
  9. pause
复制代码

作者: Batcher    时间: 2023-4-27 22:04

回复 8# maghreb


如果需要上传文件,可以用阿里云盘或百度网盘。

如果需要上传截图,可以找个图床,例如:
http://bbs.bathome.net/thread-60985-1-1.html
作者: maghreb    时间: 2023-4-28 06:44

感谢各位大佬,论坛有你而精彩




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2