Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

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

Ветеран


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

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


Код: Выделить весь код
@Echo Off
Set MyDir=C:\lab1\wingraf
Set Ras=.gif

Call :_subdir %MyDir% %Ras%
Echo %Size%
Pause>Nul
Exit

:_subdir
For /R %1 %%s In (*) Do if %%~xs==%2 SET /A Size+=%%~zs
EXIT /B
Это сообщение посчитали полезным следующие участники:

Отправлено: 22:36, 29-04-2013 | #2