Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Вывод информации об архивах в текстовый файл 
Author Message
Tol!k



PostPosted: Fri May 25, 2012 22:08    Post subject: Reply with quote

Code:
@echo off &setlocal enableextensions
::   http://forum.wincmd.ru/viewpost.php?p=92754

set "Arc=%COMMANDER_PATH%\7-Zip\7z.exe"

for /f "delims=" %%f in ('type "%~1" ^|findstr /vec:"\\"') do (
   for /f "tokens=2,*" %%j in (
      '""%Arc%" l "%%f" |findstr /rc:" [0-9][0-9]* files^, [0-9][0-9]* folders$""'
      ) do (
      rem   в следующей строке 2 символа табуляции
      rem   echo "%%~nxf"{tab}%%~zf{tab}%%k
      echo "%%~nxf"   %%~zf   %%k
   )
)
goto :eof

------------------------------------------------------------

TOTALCMD#BAR#DATA
%ComSpec% /c chcp 1251 &%COMMANDER_PATH%\scripts\архивы.cmd
"%WL" >>архивы.txt
%windir%\System32\shell32.dll,54
Архивы >> Windows-1251.txt

1
-1

------------------------------------------------------------

TOTALCMD#BAR#DATA
%ComSpec% /u /c %COMMANDER_PATH%\scripts\архивы.cmd
"%WL" >архивы.txt
%windir%\System32\shell32.dll,54
Архивы > UTF-16.txt

1
-1

View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group