Командная строка, батники, сценарии (bat, cmd) - [1685] :: Программы

Код:

@Echo Off
rem SetLocal EnableDelayedExpansion
For /f "tokens=2*" %%a In (
'reg query HKLM\SOFTWARE\7-Zip /v Path 2^>nul ^| Findstr /i Path'
) Do Set backup="%%b\7z.exe"
If Not Defined backup Echo Файловый архиватор 7-Zip не установлен>> "7-Zip errors.txt" & GoTo :eof

For /f "tokens=2*" %%a In (
'reg query HKLM\SOFTWARE\Ahead\shared /v NeroAPI 2^>nul ^| Findstr /i NeroAPI'
) Do Set Nero=%%b
If Not Defined Nero Echo Nero не установлен>> "%archDate% Nero errors.txt" & GoTo :eof

del /q "*log.txt"> nul 2>&1

For /f "delims=" %%c In (List.txt) Do (
Set data="%%c"
Set count=0
Call :GetCount "%%c"
Call

rocess)
Goto :eof

rocess
%backup% u %archName% %data% -up1q0r2x2y2z1w2 -mx9 -ms=off>> "7-Zip process.txt" 2>&1
Goto :eof

:GetCount
Set archName="%~1"
:Again
For /f "delims=\* tokens=1*" %%d In (%archName%) Do (
Set /a count+=1
Set archName="%%e")
If Not %archName%=="" GoTo Again
For /f "delims=\ tokens=%count%" %%f In ("%data:&=^&%") Do Set archName="%%f"
Goto :eof

Модерирует : gyra, Maz
Widok (19-11-2007 12:08): лимит страниц. продолжаем здесь	Версия для печати • Подписаться • Добавить в закладки
На первую страницу • к этому сообщению • к последнему сообщению