Надобы найти
бесплатный разархиватор ZIP`ов, ибо RAR все же надо покупать... (я на сайте pkware не нашел
)
Код:
@Echo off
setLocal EnableExtensions
set total=0
set proceed=0
for %%F in (*.zip) do call :unpack "%%F"
echo Found %total% archives, unpacked %proceed%
goto End
:unpack
del /f "%~n1.txt" 2>nul
set /a total+=1
rem Здесь должна быть команда распаковки архива %1
"%ProgramFiles%\WinRar\winrar.exe" e -o+ %1
if %ErrorLevel%==0 set /a proceed+=1
ren readme.txt "%~n1.txt"
exit /b
:End
