Добавлено: Пт ноя 02, 2012 13:11
Flasher, ну вот собственно об этом с самого начала и речь была
Спасибо!
Спасибо!
Форум поддержки пользователей Total Commander
https://forum.wincmd.ru/
Код: Выделить всё
TOTALCMD#BAR#DATA
%comspec% /c start "7-zip Packing..." /min "%COMMANDER_PATH%\Packers\7zg.exe"
a -t7z -mx -m0=LZMA2 -mse -ssw -scsWIN -y -- %N.7z "@%L"
%COMMANDER_PATH%\Icons\7zip_add.ico
Add all to 7-Zip (Full Path) - Pack FOLDERS (Ultra Compression)
1
-1
Код: Выделить всё
'WSH.Popup "Упаковка завершена!", 1.4 , "Результат", 64
'Set FSO = Nothing
'Set WSH = Nothing
'WScript.QuitКод: Выделить всё
SetLocale(1049)Код: Выделить всё
SetLocale(1049)Код: Выделить всё
' Вывод сообщения и выход:
SetLocale(1049)
WSH.Popup "Упаковка завершена!", 1.4, "Результат", 64
Set FSO = Nothing : Set WSH = Nothing : WScript.Quit
Код: Выделить всё
' Вывод сообщения и выход:
SetLocale(1049) WSH.Popup "Упаковка завершена!", 1.4, "Результат", 64
Set FSO = Nothing : Set WSH = Nothing : WScript.Quit
Файл скрипта надо было сохранять не в UTF-8, а в обычный ANSI.Iori писал(а):Вот ещё картинка как это выглядит.
Код: Выделить всё
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Utils\7-Zip\7z.exe
e %V -o"%T%O\" *.gif *.png *.jpg -aour
wcmicons.dll,31
Рекурсивно распаковать файлы gif, png, jpg из архива под курсором в папку др. панели с тем же именем
%COMMANDER_PATH%\Utils\7-Zip\
1Код: Выделить всё
TOTALCMD#BAR#DATA
%ComSpec% /c for %# in (*.*) do "%COMMANDER_PATH%\Utils\7-Zip\7z.exe" a "%~n#.zip" "%#"
wcmicons.dll,30
Упаковать файлы активной папки в однобазовые zip-архивы
1Код: Выделить всё
@echo off &setlocal enableextensions &chcp 1251 >nul
rem Распаковка с помощью 7-Zip
set "Arc=%COMMANDER_PATH%\Packers\7zg.exe"
goto :------------------------------------------------------------
rem Параметры: список "D:\куда\" -o
rem -o -- в отдельные папки с именами архивов
rem Пример параметров для TC: "%L" "%%userprofile%%\Мои документы\"
rem В одноимённые папки расположенные в пути запуска (или в текущем): "%L" -o
rem В одноимённые папки расположенные рядом с архивами: "%L" "%%~dpf" -o
:------------------------------------------------------------
set "Dest=" &set "cage="
if /i "%~2"=="-o" set "cage=Yes"
if /i "%~3"=="-o" set "cage=Yes"
if not "%~2"=="" if /i not "%~2"=="-o" set "Dest=%~2"
if not "%~3"=="" if /i not "%~3"=="-o" set "Dest=%~3"
if "%cage%"=="Yes" set "Dest=%Dest%.\%%~nf"
for /f "usebackq delims=" %%f in ("%~1") do (
title Unpacking "%%~nf"
"%Arc%" x -scsWIN -y -o"%Dest%." -- "%%f"
)
Код: Выделить всё
TOTALCMD#BAR#DATA
"%COMMANDER_PATH%\Utilities\Scripts\7zip_unpack.cmd"
"%L" -o
%COMMANDER_PATH%\Icons\7zip_extract.ico
Extract all with 7-Zip (Maintain Path)
1
-1