@echo off
:: 排除指定的文件夹，删除其余的目录
:: config.ini 里的文件夹格式为：,+要排除的文件夹名+,
:: code by jm 2006-12-19

for /f "delims=" %%i in ('dir /ad /b') do findstr /i /c:",%%i," config.ini>nul||echo "%%i"
pause
goto :eof
复制代码

@echo off
:: echo之后再管道再find的方案比较慢
set dir_=,program files,Documents and Settings,
for /f "delims=" %%i in ('dir /ad /b') do (
    echo "%dir_%"|find /i ",%%i,">nul||echo "%%i"
)
pause
复制代码

@echo off
set/p nodel=输入不想删除的文件夹:
for /f "delims=" %%i in ('dir /ad /b') do (
for %%a in (%nodel%) do (if "%%i"=="%%a" set del=1)
if defined del (echo 文件夹[%%i],没有删除.&set del=) else (echo 删除文件夹[%%i]))
pause>nul
复制代码

@echo off&goto start
个人认为，2楼的两个代码，效率上都不会很高
在for的do后面使用findstr这样的外部命令，不会有效率。
第一个代码效率比第二个高，是因为第二个代码，又多用了一个管道命令。
以下代码思路：
   利用dir的ah特性，先给要排除的文件夹设为隐藏属性
   再删除所有不具备隐藏属性的文件夹
   再给要排除的文件夹解除隐藏属性，
   再删除所有具有隐藏属性的文件夹。
以下显示的为要删除的文件夹。要排除的是 “ab cd” 文件夹
:start
set paic=ab cd
attrib +h "%paic%"
for /f "delims=" %%i in ('dir/ad-h/b') do echo %%i
attrib -h "%paic%"
for /f "delims=" %%i in ('dir/adh/b') do echo %%i
pause
复制代码

@echo off
for /f "delims=" %%a in ('dir/b/ad') do (
if not "%%a"=="qq" rd/s/q "%%a"
)
pause
复制代码