Windows Script Host

Batya · Сообщение **Batya** » Сб фев 12, 2011 19:35

Rodny
Нужно установить путь на пассивной панели TC именно из vbs-скрипта?

Flasher

Rodny писал(а):является только запуск через командную строку типа ... или есть ещё варианты?

Знаю только аналог:

' Перейти(распаковать) к файлу/папке в противоположной панели
' Параметры: %P%N
With CreateObject("WScript.Shell")
.Exec("%COMMANDER_PATH%\totalcmd.exe /O /S /R=""" & WScript.Arguments(0) & """")
End With

Rodny · Сообщение **Rodny** » Сб фев 12, 2011 20:33

Batya писал(а):Нужно установить путь на пассивной панели TC именно из vbs-скрипта?

Ага, только это активная.
Ищу запасной вариант действий на случай, если Helper на данной машине отсутствует. TC может запускаться с флэшки или даже сетевого диска, поэтому обращение к "totalcmd.exe /O /S" малость тормозит.

Flasher
Спасибо, взял на заметку.

Flasher

Rodny
Значит, флешка медленная. Бери c eSATA-интерфейсом.

Batya · Сообщение **Batya** » Вс фев 13, 2011 13:37

Flasher
А с помощью TCFS2.exe можно поменять текущую папку?

Flasher

Batya
Можно ли как-то задействовать функцию msg - не знаю, но тут всё равно придётся API-шки ковырять. Об этом лучше у MVV спросить. А отдельной командой для сих нужд утилита, естественно, не располагает. Предназначение иное, к тому же она не понимает параметры ТС.

MVV · Сообщение **MVV** » Вс фев 13, 2011 22:08

Нельзя через TCFS2 изменить текущую папку. Утилита не умеет посылать сообщение WM_COPYDATA, с помощью которого можно менять папки и выполнять em-команды.

Папку можно менять, например, через TCMC, а еще - через TOTALCMD /o /s /l=.

Flasher, точно бы пропустил.

Batya · Сообщение **Batya** » Пн фев 14, 2011 09:25

Rodny
Соответственно, требуемый вариант:

Код: Выделить всё

With CreateObject("WScript.Shell") 
  .Run """" & .ExpandEnvironmentStrings("%COMMANDER_PATH%\Utils\TCMC\TCMC.exe") & """ CDS """ & NewSrcPath & """ """"", 1, True
End With

Rodny · Сообщение **Rodny** » Пн фев 14, 2011 15:53

Batya
Спасибо, я ночью уже соорудил почти такое же, только кавычек поменьше

И тут возник вопрос: а может это у меня субъективное восприятие включается и на самом деле там большой разницы и нету?
Как вообще замерить время выполнения этих вариантов, если оно меньше секунды?
Пока играюсь с флэшкой, а она не самая медленная. На глаз после "totalcmd.exe /O /S" каталог меняется медленнее по сравнению с другими вариантами, но вот насколько... Родной DateDiff везде выдаёт 0 секунд.
Гуглятся какие-то конструкции типа GetTickCount, QueryPerformanceCounter и даже Stopwatch Class из .NET Framework. Но это для меня уже слишком сложно.

P.S. Это, в общем-то, уже just for fun, основная задача решена.

Flasher

Rodny
Взял достаточно медленную флешку, распаковал туда INSTALL.CAB, сделал кнопку с предложенным мной скриптом выше - скорость выполнения 1-3 дс, чуть помедленнее Ctrl+Влево/Вправо, разница почти не заметна.

MVV · Сообщение **MVV** » Пн фев 14, 2011 16:42

По идее, после неоднократного запуска TOTALCMD /o /s винда просто будет держать файл в кэше и запускать в разы быстрее, чем в первый раз. Для тестов нужно извлекать флешку, чтобы сбросить кэш (или сбрасывать его, если есть чем).

Flasher

MVV
Извини, какой файл? И почему только файл? Тесты проводились над кучей разных папок, файлов с длинными путями. Или ты имеешь в виду скрипт-файл? А флешку взял настолько тормозную, что ТС включается за 3 секунды, а выключается за пять.

MVV · Сообщение **MVV** » Пн фев 14, 2011 17:26

Файл TOTALCMD.exe, разумеется.

И заодно все файлы, к которым он при запуске обращается.

Flasher

Ясно, первая попытка чуть помедленней - 3-4 дс.

MVV · Сообщение **MVV** » Пн фев 14, 2011 20:38

Если тотал запускается с флешки, то, думаю, первая попытка для системы - это в момент его запуска, т.е. до первой попытки вызова скрипта.