Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Создание списка файлов выборочно по расширениям 
Author Message
Tol!k



PostPosted: Sat Aug 11, 2012 15:04    Post subject: Reply with quote

Quote:
если находятся совпадающие имена, то они тоже добавляются в список.

исправление для http://wincmd.ru/forum/viewpost.php?p=73323
Code:
@echo off &setlocal enableextensions &chcp 1251 >nul

rem   Пример параметров: "%L" "%Tlist.lst"
rem                    : "%L"

if "%~2"=="" (set list=list.lst) else set "list=%~2"
cd. >"%list%"
if "%~1"=="" (dir /b/s/on/a-d >>"%list%" &goto :p)
findstr /vec:"\\" "%~1" >>"%list%"
for /f "delims=" %%d in ('findstr /ec:"\\" "%~1"') do dir /b/s/on/a-d "%%d" >>"%list%"
:p
set "p$="
cd. >"%list%.tmp"
for /f "usebackq delims=" %%f in ("%list%") do call :s "%%f"
move /y "%list%.tmp" "%list%"
goto :eof

:s
if not "%p$%"=="%~dp1" echo:>>"%list%.tmp"
set "f$=%~1"
>>"%list%.tmp" echo %f$:&=^&%
set "p$=%~dp1"
goto :eof

юникод не обещаю
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group