View previous topic :: View next topic |
Author |
Message |
vbyen
Joined: 11 Sep 2012 Posts: 16
|
(Separately) Posted: Fri Nov 02, 2012 13:11 Post subject: |
|
|
Flasher, ну вот собственно об этом с самого начала и речь была
Спасибо! |
|
Back to top |
|
|
dmitriy111
Joined: 01 Apr 2013 Posts: 25
|
(Separately) Posted: Mon May 20, 2013 18:26 Post subject: |
|
|
А что нужно прописать, чтобы архив распаковывался не в папку, где лежит 7za.exe, а в папке с архивом?
7za.exe x ...
И где можно почитать про параметры для кнопок Total Commander'a? |
|
Back to top |
|
|
Avada
Joined: 01 Aug 2008 Posts: 10252 Location: Россия, Саратов
|
(Separately) Posted: Mon May 20, 2013 19:00 Post subject: |
|
|
dmitriy111
Где почитать? В справке, разумеется. Или в соответствующей части справочника по командам. _________________ Даже самая богатая фантазия
Не представит себе наши безобразия. |
|
Back to top |
|
|
Iori
Joined: 25 Apr 2012 Posts: 551
|
(Separately) Posted: Mon Mar 24, 2014 10:17 Post subject: |
|
|
Ребята пытаюсь сделать кнопку по мотивам вот этой кнопки.
Code: |
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
Спасибо. |
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Mon Mar 24, 2014 15:58 Post subject: |
|
|
Iori
Было. _________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
Iori
Joined: 25 Apr 2012 Posts: 551
|
(Separately) Posted: Mon Mar 24, 2014 20:18 Post subject: |
|
|
Flasher
Спасибо! Отличный скрипт.
Использую этот
Можно ли как то сделать что-бы диалог был не в кракозябрах.
Пример: Здесь
Пока я закомментировал вот эти линии.
Code: | 'WSH.Popup "Упаковка завершена!", 1.4 , "Результат", 64
'Set FSO = Nothing
'Set WSH = Nothing
'WScript.Quit |
|
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Mon Mar 24, 2014 20:38 Post subject: |
|
|
Iori
Ссылка мёртвая. Последние 3 трогать нет смысла.
Попробуй поставить перед первой указанной строку: _________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
Iori
Joined: 25 Apr 2012 Posts: 551
|
(Separately) Posted: Mon Mar 24, 2014 21:57 Post subject: |
|
|
Flasher
Спасибо но не помог.
Вот ещё картинка как это выглядит.
http://s10.postimg.org/5fpomakk9/2014_03_24_113428.jpg
Пробовал так:
Code: |
' Вывод сообщения и выход:
SetLocale(1049)
WSH.Popup "Упаковка завершена!", 1.4, "Результат", 64
Set FSO = Nothing : Set WSH = Nothing : WScript.Quit
|
и так:
Code: |
' Вывод сообщения и выход:
SetLocale(1049) WSH.Popup "Упаковка завершена!", 1.4, "Результат", 64
Set FSO = Nothing : Set WSH = Nothing : WScript.Quit
|
Во втором варианте скрипт выдаёт ошибку.
Я наверно просто закомментирую 'WSH.Popup "Упаковка завершена!", 1.4 , "Результат", 64 , что-бы вас не мучать. |
|
Back to top |
|
|
Skif_off
Joined: 28 Nov 2012 Posts: 1232
|
(Separately) Posted: Mon Mar 24, 2014 22:11 Post subject: |
|
|
Iori
А если сохранить в UTF-8 или родной вендовой UTF-16 LE? |
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Mon Mar 24, 2014 23:07 Post subject: |
|
|
Iori wrote: | Вот ещё картинка как это выглядит. | Файл скрипта надо было сохранять не в UTF-8, а в обычный ANSI. _________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
Iori
Joined: 25 Apr 2012 Posts: 551
|
(Separately) Posted: Mon Mar 24, 2014 23:53 Post subject: |
|
|
Flasher
Вот теперь всё как надо.
Спасибо ещё раз за ваши скрипты ! |
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Sat May 31, 2014 13:41 Post subject: |
|
|
Запрос.
Code: | 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 |
_________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Sun Oct 05, 2014 21:47 Post subject: |
|
|
Ещё запрос: Code: | TOTALCMD#BAR#DATA
%ComSpec% /c for %# in (*.*) do "%COMMANDER_PATH%\Utils\7-Zip\7z.exe" a "%~n#.zip" "%#"
wcmicons.dll,30
Упаковать файлы активной папки в однобазовые zip-архивы
1 |
_________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
Iori
Joined: 25 Apr 2012 Posts: 551
|
(Separately) Posted: Wed Dec 24, 2014 05:44 Post subject: |
|
|
Вопрос к Tol!k-у
Уже давно использую ваш батник для распаковки с помощью 7-Zip.
Решил на днях обновить на новую бету (7zip v9.35).
Теперь когда использую кнопку с этим батником, появляется новая папка с именем архива и точкой в самом конце.
В папку нельзя зайти и нельзя удалить.
Внизу батник и сама кнопка.
Code: |
@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"
)
|
Code: |
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
|
|
|
Back to top |
|
|
Flasher
Joined: 06 Nov 2009 Posts: 14229 Location: Москва
|
(Separately) Posted: Wed Dec 24, 2014 14:51 Post subject: |
|
|
Iori
А мой скрипт (TCKB) не годится?
_________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Back to top |
|
|
|