求助：如何实现删除J盘内所有文件夹但保留指定文件夹及子文件夹？

嗨，我遇到个棘手的问题想请教大家：我有一块带多个分区的SSD，现在需要清理J盘里的内容，但得保留下面这些文件夹：

• 根目录下的：J:\System Volume Information、J:\$RECYCLE.BIN、J:\New、J:\Old Stuff
• 子文件夹：J:\Papers\Folder、J:\Room\Main Documents、J:\Year\Origin\Part、J:\Year\Origin\Part Two

我查了不少资料后写了一段批处理代码，但运行后直接把J盘里的东西全删了，完全没达到保留指定文件夹的效果，代码如下：

@ECHO OFF

SETLOCAL

SET "sourcedir=J:\"

SET "keepdir=System Volume Information"
SET "keepdir=$RECYCLE.BIN"
SET "keepdir=New"
SET "keepdir=Old Stuff"
SET "keepdir=Papers\Folder"
SET "keepdir=Room\Main Documents"
SET "keepdir=Year\Origin\Part"
SET "keepdir=Year\Origin\Part Two"

FOR /d %%a IN ("%sourcedir%\*") DO IF /i NOT "%%~nxa"=="%keepdir%" RD /S /Q "%%a"

GOTO :EOF

有没有大佬能帮我看看问题出在哪，然后给个能正常工作的方案呀？

问题分析 #

兄弟，你的代码问题其实挺明显的：

1. 变量被覆盖了：你用SET "keepdir=xxx"重复赋值，最后keepdir只会保留最后一个值Year\Origin\Part Two，前面的所有保留项都被覆盖了，所以循环里只会判断根目录文件夹是不是这个最后一个值，其他的全删了。
2. 只处理了根目录：FOR /d %%a IN ("%sourcedir%\*")只会遍历J盘根目录的文件夹，对于子文件夹的保留逻辑完全没处理——比如Papers根目录文件夹如果被删了，那里面的Folder子文件夹肯定也没了。

解决方案 #

我们可以把要保留的路径分成两类：根目录需要保留的文件夹和需要保留的子文件夹路径，然后分两步处理：先处理根目录，保留指定根文件夹，删除其他；再对需要保留子文件夹的根目录，进去清理里面的非指定子文件夹。

下面是调整后的批处理代码，我给你加了注释，方便理解：

@ECHO OFF
SETLOCAL ENABLEDELAYEDEXPANSION

:: 设置目标目录
SET "sourcedir=J:\"

:: 定义根目录需要保留的文件夹（用|分隔，方便后续判断）
SET "root_keep=System Volume Information|$RECYCLE.BIN|New|Old Stuff|Papers|Room|Year"

:: 定义需要保留的完整子文件夹路径（每个路径单独存到数组里）
SET "sub_keep[0]=Papers\Folder"
SET "sub_keep[1]=Room\Main Documents"
SET "sub_keep[2]=Year\Origin\Part"
SET "sub_keep[3]=Year\Origin\Part Two"

:: 第一步：处理根目录文件夹
FOR /d %%a IN ("%sourcedir%\*") DO (
    SET "folder=%%~nxa"
    :: 检查当前根文件夹是否在保留列表里
    ECHO !root_keep! | FINDSTR /i /c:"!folder!" >nul
    IF ERRORLEVEL 1 (
        :: 不在保留列表，删除整个文件夹
        RD /S /Q "%%a"
        ECHO 已删除根目录文件夹：%%a
    ) ELSE (
        :: 在保留列表，进入下一步处理子文件夹（如果是需要保留子文件夹的根目录）
        CALL :process_subfolders "%%a"
    )
)

GOTO :EOF

:: 子过程：处理指定根目录下的子文件夹，只保留指定的子路径
:process_subfolders
SET "root=%~1"
SET "root_rel=%root:%sourcedir%=%"

:: 遍历当前根目录下的所有子文件夹
FOR /d %%b IN ("%root%\*") DO (
    SET "sub_path=!root_rel!\%%~nxb"
    :: 标记是否需要保留
    SET "keep=0"
    :: 遍历所有需要保留的子路径，检查是否匹配
    FOR /l %%i IN (0,1,3) DO (
        IF /i "!sub_path!"=="!sub_keep[%%i]!" (
            SET "keep=1"
            :: 找到匹配的，就不用继续检查了
            GOTO :check_done
        )
    )
    :check_done
    IF !keep! EQU 0 (
        :: 不需要保留，删除
        RD /S /Q "%%b"
        ECHO 已删除子文件夹：%%b
    ) ELSE (
        :: 如果这个子文件夹还有下一级，继续递归处理
        CALL :process_subfolders "%%b"
    )
)

GOTO :EOF

注意事项 #

1. 运行前一定要先测试：可以先把RD /S /Q改成ECHO 将要删除：，看看输出的删除列表是不是符合预期，避免误删重要文件！
2. System Volume Information和$RECYCLE.BIN是系统文件夹，默认权限可能会导致删除命令报错，不过没关系，这俩本来就是要保留的，报错也不影响其他操作。
3. 如果你的保留子路径有更深的层级，代码里的递归逻辑已经处理了，会自动深入到下一级清理非指定文件夹。

备注：内容来源于stack exchange，提问作者Demet