Tol!k

|
Posted: Sat Aug 11, 2012 15:04 Post subject: |
|
|
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
|
юникод не обещаю |
|