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

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

Новый участник


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

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


El Sanchez, спасибо! Дописал куда будет сохранять только


@Echo Off
Set Cnt=0
For /F "Tokens=*" %%A In ('type broad.int^|FindStr /I "E:\Music"') Do Call :_Func "%%A"
Exit /B 0

:_Func
Set "Str=%~1"
If "%Str:~14%"=="" Exit /B
If %Cnt% EQU 1 Exit /B
Set "Str=%Str:~14%"
Set "Str=%Str: =$%"
For /F "Tokens=1 Delims=$" %%A In ("%Str%") Do Echo.%%A>>1.txt
Set /A Cnt+=1


Файлик 1.txt не подчищается с каждым запуском скрипта... Накапливается по строчке все больше и больше

Отправлено: 17:41, 18-05-2011 | #8