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 

Рекурсивная пофайловая упаковка
Goto page Previous  1, 2, 3, 4, 5, 6, 7  Next
 
Post new topic   Reply to topic    Total Commander Forum Index -> Автоматизация Total Commander printer-friendly view
View previous topic :: View next topic  
Author Message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва
Post (Separately) Posted: Wed Apr 22, 2015 10:53    Post subject: Reply with quote
Nick wrote:
никто не отвечает
В этой теме тоже никто не отвечает. И что теперь? Советую ещё раз перечитать здешнее послесловие.
Касаемо задачи: Bas поменять на Fil, я полагаю.
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Back to top
View user's profile Send private message
Nick



Joined: 26 Dec 2014
Posts: 107
Post (Separately) Posted: Wed Apr 22, 2015 12:57    Post subject: Reply with quote
Flasher
Flasher wrote:
Советую ещё раз перечитать здешнее послесловие.
Имеется в виду это сообщение ?
Если это по поводу создания новой темы, то ведь подобной задачи в принципе, вроде, не было.
Flasher wrote:
Bas поменять на Fil, я полагаю
Т.е. в строке 112 и 113:
Name = FSO.GetBaseName(FF) & "." & Ext
If FSO.FileExists(Path & FSO.GetBaseName(FF) & "." & Ext) Then

Заменить на:
Name = FSO.GetFileName(FF) & "." & Ext
If FSO.FileExists(Path & FSO.GetFileName(FF) & "." & Ext) Then

Больше ничего нигде менять не надо?
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва
Post (Separately) Posted: Wed Apr 22, 2015 13:16    Post subject: Reply with quote
Nick wrote:
Имеется в виду это сообщение ?
"Здешнее" - значит, из этого топика (обсуждение в спойлерах). Памятка ни при чём.

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



Joined: 26 Dec 2014
Posts: 107
Post (Separately) Posted: Wed Apr 22, 2015 20:32    Post subject: Reply with quote
Flasher
Пока, вроде, нормально работает.

 Прочее
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10252
Location: Россия, Саратов
Post (Separately) Posted: Wed Apr 22, 2015 21:21    Post subject: Reply with quote
Nick
Спойлер с P.S. — на предыдущей странице.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
Nick



Joined: 26 Dec 2014
Posts: 107
Post (Separately) Posted: Fri Apr 24, 2015 15:13    Post subject: Reply with quote
Flasher
Небольшой offtopic.
 Прочее
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва
Post (Separately) Posted: Fri Apr 24, 2015 16:15    Post subject: Reply with quote
 2Nick

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



Joined: 25 Feb 2019
Posts: 34
Post (Separately) Posted: Tue Mar 12, 2019 10:43    Post subject: Reply with quote
Quote:
1. Вообще у TCHelper.dll есть своя тема. Для каких целей он понадобился?


Отвечу тут:

Дело в том что я сделал так как указано в "памятке". Но вылетает окно с ошибкой!
Quote:
Ошибка выполнения Microsoft VBScript

И поэтому полез перечитывать статью на tckb.

В идеале хотелось бы сделать такие кнопки:
5. <параметры упаковки>

А как в параметрах правильно указывать путь и параметр упаковки?
Code:
"C:\Pack" 1 exe "" %WL "%P" RAR

или наоборот
Code:
%WL "%P" RAR "C:\Pack" 1 exe "" %WL "%P"
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва
Post (Separately) Posted: Tue Mar 12, 2019 11:18    Post subject: Reply with quote
rediffusion wrote:
Дело в том что я сделал так как указано в "памятке".
Нет. Не сделали. Или проигнорировали то, что там написано.

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



Joined: 01 Aug 2008
Posts: 10252
Location: Россия, Саратов
Post (Separately) Posted: Tue Mar 12, 2019 11:26    Post subject: Reply with quote
rediffusion
Всего один пример того, чего вы НЕ сделали — отсутствие полного сообщения об ошибке (см. п. 2 в конце памятки). У заголовка этого окна в отсутствие его содержания информативность нулевая.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
rediffusion



Joined: 25 Feb 2019
Posts: 34
Post (Separately) Posted: Tue Mar 12, 2019 13:23    Post subject: Reply with quote
Если скрипт не работает!

1. ¦
Опциональная упаковка выбранных файлов или файлов в структуре выбранных каталогов.
2. ¦
Код ошибки:
 Hidden text

3. ¦
Code:
[em_vim_0003]
Cmd=%COMMANDER_PATH%\Scripts\New\TCWSHelper\wscript.exe "%COMMANDER_PATH%\Scripts\New\7-Zip_Archives.vbs"
Param=%WL "" rar "" -m5 -s -rr5p -pPASSWORD -ag_DD.MM.YY
Path=%COMMANDER_PATH%\Scripts\New\
Button=C:\Windows\System32\WScript.exe
Menu=Упаковка в отдельный архив
Iconic=0

Сначала "ОШИБКА" вылетает первой а потом происходит упаковка.

4. ¦
Quote:
Total Commander 9.21a 64bit 32bit VIM 35 Matros portable

5. ¦
ОС:
 Hidden text

6. ¦
Версия интерпретатора - 5.812.10240.16384
Quote:
Плагин "FileInfo" при нажатии на CTRL+Q показывает только 4 иконки. Версию посмотрел такой кнопкой в "TC":
Code:
Cmd=%COMMANDER_PATH%\TCIMG.exe
Param=versn=%P%N

 Hidden text


P.S.
Пробовал и это и ничего, тишина:
Code:
TCWSHelp.exe /REGSERVER

 Hidden text


На файле CTRL+ENTER и ввод тоже тишина.
Куда копать не знаю!?
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва
Post (Separately) Posted: Tue Mar 12, 2019 14:23    Post subject: Reply with quote
rediffusion
Вот странный вы человек. Я ссылку на пост вам привёл, где сказано про пункт 8 памятки. Где в шапке скрипта вы видите условие с необходимостью использовать какой-то компоненент (библиотеку)? Там вообще нет условий. Так на кой ляд сюда было приплетать регистрацию устаревшего TCWSHelp.exe, о котором даже речь не велась, и указывать путь к wscript.exe до пути к скрипту?

1. В памятке написано:
Quote:
Укажите ссылку на нужный пост, если скриптов в топике приведено более одного.
Вы это сделали? Нет. Не заставляйте других лазить по топику и TCKB в поисках соответствия названию. Вашу проблему нужно решать прежде всего вам. Ссылка на пост отмечена словом "Отдельно" в левом верхнем углу.
2. В памятке написано:
Quote:
Приведите код ошибки, скопированный из вылетевшего окошка по Ctrl+C. Желательно оставить только необходимое (текст сообщения и строку ошибки).
Вы опять проигнорировали и привели скриншот.

И не надо так растягивать отчёт об ошибке с ненужным обрамлением в BBCode, избыточной информацией, скриншотами, спойлерами и т .д. Пишите простой текст только с запрашиваемой информацией в 5-6 строк, этого будет более чем достаточно, и в этом будет куда проще ориентироваться.

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



Joined: 25 Feb 2019
Posts: 34
Post (Separately) Posted: Tue Mar 12, 2019 19:29    Post subject: Reply with quote
Flasher

Ого! Круто! Вы настоящий волшебник из страны ОЗ. Laughing

Всё работает но тем не менее есть вопросы.
1. Появляется окно после выполнения и там какая то "аБрАкАдАбРа".
Quote:
P P(jPeCfCbCfPePIPSP°CU PiPsC„P°P№P»PsPIP°CU CfPiP°PePsPIPeP°
PJPiP'PcPsPIPcP- РР-Р1РмСЬС€РмР5Р-!

 Скриншот на всякий случий

У меня вот такую кодировку .vbs файла показывает в AkelPad:
Code:
Win  65001 (UTF-8) без BOM

2. Этот параметр не работает. Я так понял это для создания "самораспаковывающегося архива".
Code:
"C:\My Files\List.txt" 1 exe "" -sfx7z.sfx

Quote:
Строка: 67
Символ: 1
Ошибка: Файл не найден
Код: 800А0035
Источник: Ошибка выполнения Microsoft VBScript

3.
Вот тут ошибка видать, работает не корректно! Создаёт архив с одним и тем же названием "001_005_Music"
. Откуда берёт не знаю?
Code:
%WL . 7z "" -mx9 -m0=LZMA2:fb273 -m1=LZMA2:lc4

Если записать такой вариант то работает:
Code:
%WL "" 7z "" -mx9 -m0=LZMA2:fb273 -m1=LZMA2:lc4

4. При выполнении данного параметра тоже появляется окно с "аБрАкАдАбРа".
Code:
%WL "%T." 7Z *.mht;*.htm;*.html -mx9 -m0=LZMA2 -ssw -pПАРОЛЬ

5. В этих двух параметрах как понять какой пароль используется? Ну упаковал а распаковать не могу, не знаю какой пароль?
Code:
-pSECRET -pПАРОЛЬ


UPD
Да знаю опять получилась простыня... Embarassed Embarassed Embarassed Не бейте палками. Если что могу все 5 вопросов запрятать под спойлер. Wink

Last edited by rediffusion on Tue Mar 12, 2019 20:09; edited 1 time in total
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва
Post (Separately) Posted: Tue Mar 12, 2019 20:00    Post subject: Reply with quote
rediffusion
1,4. Возможны только такие варианты кодировки: ANSI, UTF-16 LE/BE. Последние полезны при иноязычной локали или наличии юникода в коде.
2. Разве первый параметр не даёт ответ на проблему? Это пример существующего пути со списком List.txt в кодировке UTF-16.
3. Какая же это ошибка? Читать шапку нужно внимательно:
Code:
'     б) если написать точку, то файлы каждой папки - в одноименный архив;
5. Это же примеры. Ключ со своим паролем должен быть один. Как минимум для понимания нужно изучить упаковочные команды 7z.exe и rar.exe.

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



Joined: 25 Feb 2019
Posts: 34
Post (Separately) Posted: Tue Mar 12, 2019 20:33    Post subject: Reply with quote
Flasher

Quote:
б) если написать точку, то файлы каждой папки - в одноименный архив;


Нет пожалуй в этот раз я прав!
Запись если такая то работает отлично:
Code:
%WL "C:\My Files\." 7z "" -mx9 -m0=LZMA2:fb273 -m1=LZMA2:lc4

Там после
Code:
%WL .

просто точка и она не обрамлена кавычками. И если выделить папки то не работает. А если файлы то работает, создаётся архив с одним и тем же именем "001_007_Music17.7z" откуда берётся такое название я не знаю!?
Нужна такая запись и тогда выделенные каталоги архивирует спокойно.
Code:
"C:\My Files\."

Вылетает окно с "Введите базовое имя архива:". Работает!

Спасибо за помощь! Но думаю лучше я отвечу вам так как новичок может не понять (форум должен быть полезным).
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, 4, 5, 6, 7  Next
Page 6 of 7

 
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