リストファイルに存在しないフォルダを削除する

deleteNonListFolder.bat

@echo off
pushd %0\..
setlocal enabledelayedexpansion

set "TARGET_FOLDER=D:\xxxx"
for /f "tokens=*" %%a in ('dir %TARGET_FOLDER% /b /a:d') do (
    set SHOULD_DEL=true
    for /f "tokens=1* skip=1" %%i in (include.list) do (
        if "%%a"=="%%j" (
            echo [DEBUG] -- バックアップ対象：%%j
            set SHOULD_DEL=false
        )
    )
    if !SHOULD_DEL!==true ( 
        echo rd "%TARGET_FOLDER%\%%a" /q/s
        echo [INFO] -- %TARGET_FOLDER%\%%aを削除しました。
    )
)
pause

include.list

from  to
from1 to1
from2 to2