Страница 7 из 13

Добавлено: Пт ноя 02, 2012 13:11
vbyen
Flasher, ну вот собственно об этом с самого начала и речь была
Спасибо!

Добавлено: Пн май 20, 2013 18:26
dmitriy111
А что нужно прописать, чтобы архив распаковывался не в папку, где лежит 7za.exe, а в папке с архивом?

7za.exe x ...

И где можно почитать про параметры для кнопок Total Commander'a?

Добавлено: Пн май 20, 2013 19:00
Avada
dmitriy111
Где почитать? В справке, разумеется. Или в соответствующей части справочника по командам.

Добавлено: Пн мар 24, 2014 10:17
Iori
Ребята пытаюсь сделать кнопку по мотивам вот этой кнопки.

Код: Выделить всё

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
Надо что-бы кнопка упаковала все выбранные файлы в индивидуальные архивы zip с максимальным сжатием LZMA.

Пример:
file1.nes --> file1.zip
file2.nes --> file2.zip
file3.nes --> file3.zip

Спасибо.

Добавлено: Пн мар 24, 2014 15:58
Flasher
Iori
Было.

Добавлено: Пн мар 24, 2014 20:18
Iori
Flasher

Спасибо! Отличный скрипт.
Использую этот

Можно ли как то сделать что-бы диалог был не в кракозябрах.
Пример: Здесь

Пока я закомментировал вот эти линии.

Код: Выделить всё

'WSH.Popup "Упаковка завершена!", 1.4 , "Результат", 64
'Set FSO = Nothing
'Set WSH = Nothing
'WScript.Quit

Добавлено: Пн мар 24, 2014 20:38
Flasher
Iori
Ссылка мёртвая. Последние 3 трогать нет смысла.
Попробуй поставить перед первой указанной строку:

Код: Выделить всё

SetLocale(1049)

Добавлено: Пн мар 24, 2014 21:57
Iori
Flasher

Спасибо но

Код: Выделить всё

SetLocale(1049)
не помог.

Вот ещё картинка как это выглядит.
http://s10.postimg.org/5fpomakk9/2014_03_24_113428.jpg

Пробовал так:

Код: Выделить всё

' Вывод сообщения и выход:
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
Во втором варианте скрипт выдаёт ошибку.

Я наверно просто закомментирую 'WSH.Popup "Упаковка завершена!", 1.4 , "Результат", 64 , что-бы вас не мучать.

Добавлено: Пн мар 24, 2014 22:11
Skif_off
Iori
А если сохранить в UTF-8 или родной вендовой UTF-16 LE?

Добавлено: Пн мар 24, 2014 23:07
Flasher
Iori писал(а):Вот ещё картинка как это выглядит.
Файл скрипта надо было сохранять не в UTF-8, а в обычный ANSI.

Добавлено: Пн мар 24, 2014 23:53
Iori
Flasher

Вот теперь всё как надо. :)

Спасибо ещё раз за ваши скрипты !

Добавлено: Сб май 31, 2014 13:41
Flasher
Запрос.

Код: Выделить всё

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

Добавлено: Вс окт 05, 2014 21:47
Flasher
Ещё запрос:

Код: Выделить всё

TOTALCMD#BAR#DATA
%ComSpec% /c for %# in (*.*) do "%COMMANDER_PATH%\Utils\7-Zip\7z.exe" a "%~n#.zip" "%#"

wcmicons.dll,30
Упаковать файлы активной папки в однобазовые zip-архивы

1

Добавлено: Ср дек 24, 2014 04:44
Iori
Вопрос к Tol!k-у

Уже давно использую ваш батник для распаковки с помощью 7-Zip.

Решил на днях обновить на новую бету (7zip v9.35).
Теперь когда использую кнопку с этим батником, появляется новая папка с именем архива и точкой в самом конце.
В папку нельзя зайти и нельзя удалить.

Внизу батник и сама кнопка.

Код: Выделить всё

@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


Добавлено: Ср дек 24, 2014 13:51
Flasher
Iori
А мой скрипт (TCKB) не годится?

[mod="Avada"]Часть обсуждения перенесена в более подходящую тему.[/mod]