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 

Кнопки для 7-Zip
Goto page Previous  1, 2, 3 ... 6, 7, 8 ... 11, 12, 13  Next
 
Post new topic   Reply to topic    Total Commander Forum Index -> Автоматизация Total Commander printer-friendly view
View previous topic :: View next topic  
Author Message
vbyen



Joined: 11 Sep 2012
Posts: 16

Post (Separately) Posted: Fri Nov 02, 2012 13:11    Post subject: Reply with quote

Flasher, ну вот собственно об этом с самого начала и речь была
Спасибо!
Back to top
View user's profile Send private message
dmitriy111



Joined: 01 Apr 2013
Posts: 25

Post (Separately) Posted: Mon May 20, 2013 18:26    Post subject: Reply with quote

А что нужно прописать, чтобы архив распаковывался не в папку, где лежит 7za.exe, а в папке с архивом?

7za.exe x ...

И где можно почитать про параметры для кнопок Total Commander'a?
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10252
Location: Россия, Саратов

Post (Separately) Posted: Mon May 20, 2013 19:00    Post subject: Reply with quote

dmitriy111
Где почитать? В справке, разумеется. Или в соответствующей части справочника по командам.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
Iori



Joined: 25 Apr 2012
Posts: 551

Post (Separately) Posted: Mon Mar 24, 2014 10:17    Post subject: Reply with quote

Ребята пытаюсь сделать кнопку по мотивам вот этой кнопки.

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
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Mon Mar 24, 2014 15:58    Post subject: Reply with quote

Iori
Было.
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Back to top
View user's profile Send private message
Iori



Joined: 25 Apr 2012
Posts: 551

Post (Separately) Posted: Mon Mar 24, 2014 20:18    Post subject: Reply with quote

Flasher

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

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

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


Code:
'WSH.Popup "Упаковка завершена!", 1.4 , "Результат", 64
'Set FSO = Nothing
'Set WSH = Nothing
'WScript.Quit
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Mon Mar 24, 2014 20:38    Post subject: Reply with quote

Iori
Ссылка мёртвая. Последние 3 трогать нет смысла.
Попробуй поставить перед первой указанной строку:
Code:
SetLocale(1049)

_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Back to top
View user's profile Send private message
Iori



Joined: 25 Apr 2012
Posts: 551

Post (Separately) Posted: Mon Mar 24, 2014 21:57    Post subject: Reply with quote

Flasher

Спасибо но
Code:
SetLocale(1049)
не помог.

Вот ещё картинка как это выглядит.
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
View user's profile Send private message
Skif_off



Joined: 28 Nov 2012
Posts: 1232

Post (Separately) Posted: Mon Mar 24, 2014 22:11    Post subject: Reply with quote

Iori
А если сохранить в UTF-8 или родной вендовой UTF-16 LE?
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Mon Mar 24, 2014 23:07    Post subject: Reply with quote

Iori wrote:
Вот ещё картинка как это выглядит.
Файл скрипта надо было сохранять не в UTF-8, а в обычный ANSI.
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Back to top
View user's profile Send private message
Iori



Joined: 25 Apr 2012
Posts: 551

Post (Separately) Posted: Mon Mar 24, 2014 23:53    Post subject: Reply with quote

Flasher

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

Спасибо ещё раз за ваши скрипты !
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Sat May 31, 2014 13:41    Post subject: Reply with quote

Запрос.
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
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Sun Oct 05, 2014 21:47    Post subject: Reply with quote

Ещё запрос:
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
View user's profile Send private message
Iori



Joined: 25 Apr 2012
Posts: 551

Post (Separately) Posted: Wed Dec 24, 2014 05:44    Post subject: Reply with quote

Вопрос к 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
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Wed Dec 24, 2014 14:51    Post subject: Reply with quote

Iori
А мой скрипт (TCKB) не годится?

 !  Avada:
Часть обсуждения перенесена в более подходящую тему.

_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Total Commander Forum Index -> Автоматизация Total Commander All times are GMT + 4 Hours
Goto page Previous  1, 2, 3 ... 6, 7, 8 ... 11, 12, 13  Next
Page 7 of 13

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group