Сравнение файлов в панелях по именам
Select messages from
# through # FAQ
[/[Print]\]
Goto page Previous  1, 2, 3, 4, 5, 6, 7, 8, 9  Next  :| |:
Total Commander -> Автоматизация Total Commander

#76:  Author: FlasherLocation: Москва PostPosted: Sun Apr 19, 2015 18:59
    —
LonerD wrote:
Сейчас проверил - на корне не отрабатывает (висит в процессах).
Он как раз отрабатывает, а не просто висит. Сравнивать только файлы в корнях - это для чего? Неужели ты отображаешь файлы без подкаталогов в корне?

#77:  Author: hjiapex PostPosted: Tue Apr 21, 2015 14:46
    —
Тут еще одна проблема возникла. Почему то на WinХР скрипт не работает, при использовании ничего не происходит.

#78:  Author: FlasherLocation: Москва PostPosted: Tue Apr 21, 2015 14:52
    —
Она не возникла. Я знал про неё. Mr. Green
Ссылка здесь уже приводилась.

#79:  Author: hjiapex PostPosted: Tue Apr 21, 2015 15:13
    —
Ссылочка битая похоже, можно перезалить clip?

#80:  Author: FlasherLocation: Москва PostPosted: Tue Apr 21, 2015 15:35
    —
На младших версиях в папке system32 лежит.

#81:  Author: hjiapex PostPosted: Wed Apr 22, 2015 15:40
    —
Если вы имеете в виду windows/system32 то в моей ХП такого файла нет (clip.exe)

#82:  Author: FlasherLocation: Москва PostPosted: Wed Apr 22, 2015 15:43
    —
hjiapex
Слово "младших" ни о чём не говорит?

#83:  Author: hjiapex PostPosted: Wed Apr 22, 2015 15:45
    —
Ну стал бы я такие вопросы озвучивать, будь мне все понятно?! Че за издевательство то такое? Что трудного перезалить маленький файлик на любой обменник? Нет же нужно поиграть на струнах моего мозга. Или это неотъемлемое условие на этом форуме?

#84:  Author: FlasherLocation: Москва PostPosted: Wed Apr 22, 2015 15:56
    —
А в голову не приходит мысль, что кто-то сейчас тоже на XP, и у него при себе этого файлика нет? Струны нужно лучше натягивать. Wink
Младшие версии - все, что появились после XP - Vista, 7, 8, 10.
И не забываем про волшебное слово "google".

#85:  Author: Skif_off PostPosted: Wed Apr 22, 2015 20:24
    —
Flasher wrote:
Младшие версии - все, что появились после XP - Vista, 7, 8, 10.

Обычно младшие - это младшие по номеру, а не по возрасту Smile)
Ппц, я тут уже дистриб Win2000 начал расковыривать...

#86:  Author: hjiapex PostPosted: Wed Apr 22, 2015 23:15
    —
Просто уточню. Для ХП скрипт выглядит так? Что то мне подсказывает, что нет...

Code:
'=====================================================================
' Выделение в панелях одноимённых файлов и/или папок

' Параметры: "%P" "%T" <файлы/каталоги/всё: 1/2/3>
'======================= Путь к утилите TCFS2 ========================
TCFS2 = """%COMMANDER_PATH%\Utils\TCFS2\TCFS2.exe"""
Clip  = "%COMMANDER_PATH%\Utils\clip.exe"
'=====================================================================
With CreateObject("WScript.Shell")
  Clip = .ExpandEnvironmentStrings(Clip)
  TempFile = CreateObject("Shell.Application")._
  NameSpace(.ExpandEnvironmentStrings("%TEMP%")).Self.Path & "\" & FSO.GetTempName
  FSO.OpenTextFile(TempFile, 2, True, -1).Write List1
  .Run "%comspec% /c """"" & Clip & """ < """ & TempFile & """""", 0, True
  FSO.OpenTextFile(TempFile, 2, True, -1).Write List2
  .Run """" & TCFS2 & """ /ef msg($0B,0) tcm(2033,0) send({TAB})",,True
  .Run "%comspec% /c """"" & Clip & """ < """ & TempFile & """""", 0, True
  .Run """" & TCFS2 & """ /ef tcm(2033,0) send({TAB}) msg($0B,1) redraw()",,True
  .Run "cmd /c type|" & Clip,0
End With : FSO.DeleteFile TempFile, 1 : D.RemoveAll : G.RemoveAll : Set D = Nothing
Set G = Nothing : Set Items = Nothing : Set FSO = Nothing : WScript.Quit


И еще вопрос по поводу clip'a, что с ним делать? Просто скинуть в корень с программой? Или в настройках цвета и ИНИ файла тоже добавить по аналогии TCFS2?

#87:  Author: FlasherLocation: Москва PostPosted: Thu Apr 23, 2015 06:13
    —
hjiapex wrote:
Что то мне подсказывает, что нет...
Конечно, нет. Это только заменяемый кусок, но и в нём нужны небольшие правки в соответствии с данными в средней части исходника.
hjiapex wrote:
Просто скинуть в корень с программой?
Если его скинуть в system32, то исходник править вообще не нужно.

#88:  Author: hjiapex PostPosted: Thu Apr 23, 2015 09:49
    —
Flasher
То есть тем скриптом, который идет на семерку?

Если да, то вот я сижу у одного пользователя, скинул в windows/system32 clip.exe и при использовании ничего не происходит.

#89:  Author: AvadaLocation: Россия, Саратов PostPosted: Thu Apr 23, 2015 10:52
    —
hjiapex
Замечание за нарушение правил форума: необоснованное полное цитирование скриптов вместо ссылки на них приравнивается в оверквотингу. Научитесь нормально оформлять сообщения. Код заменён ссылкой.


Last edited by Avada on Thu Apr 23, 2015 13:11; edited 1 time in total

#90:  Author: sa PostPosted: Thu Apr 23, 2015 11:07
    —
hjiapex
Советую проверить строку с TCFS2:
TCFS2 = """%COMMANDER_PATH%\Utils\TCFS2\TCFS2.exe"""
Промелькнула строка, где вместо трёх кавычек использовалась одна.



Total Commander -> Автоматизация Total Commander


output generated using printer-friendly topic mod. All times are GMT + 4 Hours

Goto page Previous  1, 2, 3, 4, 5, 6, 7, 8, 9  Next  :| |:
Page 6 of 9

Powered by phpBB © 2001, 2005 phpBB Group