Например, так:
Код:

@echo off
setlocal enableextensions enabledelayedexpansion
>"List.txt" (
for /d %%i in ("*.*") do 2>nul dir /b /a:-d /o:d /s "%%~nxi\*.txt"
)
endlocal
exit /b 0
или так:
Код:

@echo off
setlocal enableextensions enabledelayedexpansion
>"List.txt" (
for /f "usebackq delims=" %%i in (`2^>nul dir /b /a:d`) do 2>nul dir /b /a:-d /o:d /s "%%~nxi\*.txt"
)
endlocal
exit /b 0