Tol!k

|
Posted: Fri Jan 28, 2011 14:04 Post subject: |
|
|
Flasher, уникод не получается
Code: | @echo off &chcp 1251 >nul &setlocal enableextensions
rem Пример параметров для TC: %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)
for /f "usebackq delims=" %%d in ("%~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
|
без параметров == список для текущей папки
Last edited by Tol!k on Fri Jan 28, 2011 16:20; edited 1 time in total |
|