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

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

Старожил


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

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


Код: Выделить весь код
@Echo Off
SetLocal EnableDelayedExpansion
Set TargetDir=D:\Temp
Set OutFile=filelist.txt

Echo [T_Layers]>"%OutFile%"
ChCp 1251>nul
Set i=-1
For /F "tokens=*" %%F In ('Dir "%TargetDir%\*" /B /A-D') Do (
If Not "%%~nF"=="!PreviousFile!" (Set /A i+=1&Echo !i!=%%~nF>>"%OutFile%")
Set PreviousFile=%%~nF
)

Последний раз редактировалось Anonymоus, 12-01-2012 в 19:10.


Отправлено: 18:11, 12-01-2012 | #2