[megaloman]

Тут бы хорошо смотрелось .... но, к сожалению ...»

Нормальные герои всегда идут в обход

Вот CMD с регулярным выражением.

Код:

@Echo Off
Set "BoxIn=%LocalAppData%\1C\1cv8"

for /f "usebackq delims=" %%i in (`2^>nul dir /b /a:d "%BoxIn%\????????-????-????-????-?????????????"`) Do Call :DelDir "%%i"
GoTo :Eof

:DelDir
	Set "DirName=%~1"
	If "%DirName:~35,1%"=="" GoTo :Eof

	Set "Delim=%DirName:~8,1%%DirName:~13,1%%DirName:~18,1%%DirName:~23,1%%DirName:~36,1%
	If Not "%Delim%"=="----" GoTo :Eof

	Set "Symb=%DirName:~0,8%%DirName:~9,4%%DirName:~14,4%%DirName:~19,4%%DirName:~24,12%
	Echo %Symb%| Findstr.exe /R /I "[^0-9a-z]" >nul|| RD /S /Q "%BoxIn%\%~1"
GoTo :Eof

rem           1         2         3
rem 012345678901234567890123456789012345
rem 73c58a87-39c7-4571-b760-5a70505b271f
rem 12345678 1234 1234 1234 123456789012

у меня сейчас тестовая папка находится по такому пути- D:\1c\1c8 »

Напишите Set "BoxIn=D:\1c\1c8"
В vbs-скрипте WhereDir = "D:\1C\1cv8"