[gora]

тестировать архивы посредством архиватора »

Код:

@Echo Off
SetLocal EnableDelayedExpansion
set InDir=s:\test\d\
set log=s:\test\log.txt

echo "Start" >%log%
For /F "tokens=* delims=" %%i In ('dir /S /A:-D /B "%InDir%" 2^>Nul') Do (
	"C:\Program Files\7-Zip\7z.exe" t -r -ba "%%i">Nul
	Echo "%%i"	!ERRORLEVEL!
	IF !ERRORLEVEL! neq 0 (Call :BAD "%%i") else (Call :OK "%%i")
)
Pause

:OK
Echo Archive is OK	%1 >>%log%
rem xcopy s:\test\d\ s:\test\c\ok >>%log%
GoTo :EOF

:BAD
Echo Archive is BAD	%1 >>%log%
rem xcopy s:\test\d\ s:\test\c\Bad >>%log%
GoTo :EOF

[Georgio]

Код:

@echo off

set "InDir=d:\test\d\"
set "log=d:\test\log.txt"

>"%log%" echo "Start"
pushd "%InDir%"
for /f "delims=" %%i in ('dir/a-d/b') do (
 "C:\Program Files\7-Zip\7z.exe" t -r "%%i"|>nul find/i "Everything is Ok"&& call:# "%%i" ok|| call:# "%%i" bad
)
popd

pause& exit/b

:#
>>"%log%" xcopy/y "%~1" "..\c\%2\"& goto:eof

[Herheinz]

2 gora: спасибо, но что то тут не так.
вот результат ЛОГа: ""Start"
Archive is OK "d:\test\d\test.LZH"
Archive is OK "d:\test\d\test.rar"
Archive is OK "d:\test\d\test.zip"
Archive is OK"

Вся беда в том что архив test.LZH заведомо поврежден и не может быть в порядке((

[gora]

архив test.LZH заведомо поврежден »

Выложите его на обменник и приведите ссылку здесь.

[Herheinz]

2 gora:
http://www.fayloobmennik.net/4716849

0000

[gora]

Herheinz, результат:

Код:

"Start" 
Archive is OK	"s:\test\d\35234t6.7z" 
Archive is OK	"s:\test\d\d_sl2_150321_12-12.7z" 
Archive is OK	"s:\test\d\pr.7z" 
Archive is BAD	"s:\test\d\Temp 1.7z" 
Archive is OK	"s:\test\d\Temp11.7z" 
Archive is BAD	"s:\test\d\test.lzh" 
Archive is OK	"s:\test\d\Test_7zip.7z"

ps
7-Zip Ver 9.38 beta

[Herheinz]

gora, поменял версию, теперь ErrorLevel всегда выдает 7, что приводит к тому, что ВСЕ архивы становятся плохими
(во вложении скрин с ходом выполнения команды в cmd)

[gora]

поменял версию »

Не информативно! На какую?

теперь ErrorLevel всегда выдает 7, что приводит к тому, что ВСЕ архивы становятся плохими »

Логично, ибо:

7 - Ошибка командной строки

Что-то Вы там поменяли в скрипте, но я этого не вижу.

во вложении скрин с ходом выполнения

Не вижу вложения.

[Herheinz]

gora,

Не информативно! На какую? »

на рекомендованную) 9,38 Beta

Не вижу вложения. »

вот ссылка на файлообменник

http://www.fayloobmennik.net/4717292

Что-то Вы там поменяли в скрипте, но я этого не вижу. »

вот тот вид скрипта, в котором я его запускаю

rem @Echo Off
SetLocal EnableDelayedExpansion
set InDir=d:\test\d\
set log=d:\test\log.txt

echo "Start" >>%log%
For /F "tokens=* delims=" %%i In ('dir /S /A:-D /B "%InDir%" 2^>Nul') Do (
"C:\Program Files\7-Zip\7z.exe" t -r -ba %InDir%\"%%i">Nul
Echo "%%i" !ERRORLEVEL!
IF !ERRORLEVEL! neq 0 (Call :BAD "%%i") else (Call :OK "%%i")
)
Pause

:OK
Echo Archive is OK %1 >>%log%
rem xcopy s:\test\d\ s:\test\c\ok >>%log%
GoTo :EOF

:BAD
Echo Archive is BAD %1 >>%log%
rem xcopy s:\test\d\ s:\test\c\Bad >>%log%
GoTo :EOF