View Single Post
Old 14-09-2007, 11:43 AM   #7
So9
Forum hobbit

 
Join Date: Feb 2006
Location: Anirnar, Faroe Islands
Posts: 42
Default

hi Alex Cold

in addition to data's hint
here's the script i use. runs only on win2k/xp (vista ?)

Code:
@ECHO OFF
REM Path to Commandlineversion
REM download 7za from http://downloads.sourceforge.net/sevenzip/7za442.zip
SET MYZIP="%ProgramFiles%\7zip\7za.exe"
SET MYLOG=logfile_.txt
ECHO. > %MYLOG%

REM Check for ZipExe
IF NOT EXIST %MYZIP% GOTO :NOEXE

REM ask User for basepath or use current
ECHO enter directory to scan [return for %CD%]
SET /P MYROOT=
IF (%1) EQU () SET MYROOT="%CD%"

FOR /R %MYROOT% %%f IN (*.zip) DO CALL :SCANIT "%%f"

GOTO :EOF

:SCANIT
ECHO Scanning %1
@CALL %MYZIP% t %1 > USELESS.$$$
SET /A ERROR=%ERRORLEVEL%

REM Log and Remove all
IF %ERROR% EQU 0 ECHO %1 OK >> %MYLOG%
IF %ERROR% NEQ 0 ECHO %1 CORRUPT >> %MYLOG%
IF %ERROR% NEQ 0 CALL :REMOVEIT %1

@DEL USELESS.$$$

GOTO :EOF

REM Uncomment DEL to remove corrupt files
:REMOVEIT
ECHO REMOVING %1
REM DEL %1
GOTO :EOF

:NOEXE
ECHO No ZipProgram found
GOTO :EOF
__________________

So9 is offline                         Send a private message to So9
Reply With Quote