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 

Script Request
Goto page Previous  1, 2, 3 ... 38, 39, 40
 
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: 13820
Location: Москва

Post (Separately) Posted: Sun Jun 23, 2019 16:03    Post subject: Reply with quote

Ответ на запрос:
Code:
'==================== VBS ====================
' Сравнение одноимённых каталогов в панелях ТС
' Условие:   Путь запуска — пустой
' Параметры: %Z%N %X"%P" "%T"
'=============================================
Set A = WSH.Arguments : If A.Count < 3 Then WSH.Quit
If A(1) = A(2) Then WSH.Quit
With CreateObject("Scripting.FileSystemObject")
  If StrComp(.GetAbsolutePathName("") & "\", A(1)) Then _
  AP = 2 : NP = 1 Else AP = 1 : NP = 2
  If Not .FolderExists("\\?\" & A(AP) & A(0)) Then WSH.Quit
  Check = Not .FolderExists("\\?\" & A(NP) & A(0))
End With
With CreateObject("WScript.Shell")
  If Check Then .Popup "В другой панели нет одноимённого каталога!",_
  1.7, " Сравнение/синхронизация одноимённых каталогов      ", 4144 : WSH.Quit
  .Run """%COMMANDER_EXE%"" /S=S:= """ & A(1) & A(0) & """ """ & A(2) & A(0) & """"
End With
Скрипт лучше обычной кнопки, т.к. как не будет выводить окно синхронизации в ложных ситуациях: курсор на файле, [..] или папке без наличия одноимённой в другой панели.
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Back to top
View user's profile Send private message
krmit



Joined: 09 Nov 2019
Posts: 3

Post (Separately) Posted: Sat Nov 09, 2019 00:38    Post subject: Reply with quote

Здравствуйте.
Необходим скрипт, распаковывающий определённый архив из списка в активную панель. Список (архивы 7z с полными путями, желательно внутри самого скрипта и с возможностью добавления/удаления позиций) пронумерован, номер необходимого архива передаётся как параметр.
Или, если со списком не получится, то распаковка определённого архива в активную панель.
Спасибо.
Back to top
View user's profile Send private message
Flasher



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

Post (Separately) Posted: Sat Nov 09, 2019 06:36    Post subject: Reply with quote

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



Joined: 09 Nov 2019
Posts: 3

Post (Separately) Posted: Sat Nov 09, 2019 08:08    Post subject: Reply with quote

Flasher
Предварительно просмотрел в том числе и эти две темы, ничего похожего не нашел...
Back to top
View user's profile Send private message
Flasher



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

Post (Separately) Posted: Sat Nov 09, 2019 10:04    Post subject: Reply with quote

krmit
Эти темы прежде всего соответствуют профилю вопроса.
Выделенные файлы там формируются из временного списка. Ничего не мешает заменить параметр путём к списку с соотв. кодировкой.
Зачем нумеровать список, куда и для чего передавать параметр с номером и удалять какие-то позиции, вы можете объяснить там.
_________________
Автору сборки 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 ... 38, 39, 40
Page 40 of 40

 
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