[Anonymоus]

neprotiv, я немного ошибся и не учел путей с пробелами, вот теперь все отлично работает. Сохранять в кодировке 866, чтобы нормально работало с кириллицей.

Код:

@Echo Off
For /F "tokens=*" %%d In ('dir /A:D /B') Do Dir /B ".\%%d">".\%%d\%%d.txt"