Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Старожил


Сообщения: 352
Благодарности: 119

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
@echo off &setlocal enableextensions

for /f "delims=" %%i in ('dir /b/s/ad') do (
	pushd "%%i"
	call :list
	popd
)
goto :eof

:list
if exist list.tmp del /q list.tmp
for /f "delims=" %%a in ('dir /b/a-d Call1_*_*.nmf') do (
	for /f "tokens=2,* delims=_" %%b in ("%%a") do if not "%%~nc"=="" echo "%%c" "%%a" >>list.tmp
)
set digs=""
for /f "tokens=1,*" %%a in ('sort list.tmp') do call :del_dups %%a %%b
del /q list.tmp
goto :eof

:del_dups
if %digs% == %1 del /q %2
set digs=%1
goto :eof

Последний раз редактировалось kiripanda, 16-11-2012 в 22:05.

Это сообщение посчитали полезным следующие участники:

Отправлено: 21:46, 16-11-2012 | #2