View Single Post
Old 14-09-2007, 01:27 PM   #8
Cold
Forum hobbit

 
Join Date: Aug 2007
Location: Regione Autonoma Siciliana, Italy
Posts: 48
Default

<div class='quotetop'>QUOTE(So9 @ Sep 14 2007, 01:43 PM) [snapback]310893[/snapback]</div>
Quote:
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
[/b]


Done. Thank you :brain:
Cold is offline                         Send a private message to Cold
Reply With Quote