Форум поддержки пользователей Total Commander
https://forum.wincmd.ru/
Да от него на нынешний момент только основа осталась. Как подключить библиотеку. Он выложен в теме AutoIt на ру.борде.Orion9 писал(а): Верните свой удаленный скрипт, хочется на него взглянуть
Совершенно верно. В этой теме и на офсайте есть рыба. Но при реализации куча нюансов вылезла.Orion9 писал(а):Я примерно понял технику: запустить ahk из vbs, передав ему имя. Может и попробую когда, если возникнет потребность
Понятно. Да, ошибка перестала выскакивать. Самое интересное, что изменение значения ключа не на что не влияет. Его вообще можно не прописывать. Скорость ничуть не изменилась. Но появился неприятный момент. Появляется значение WSA, которое потом меняется на правильное значение. Из-за этого пока не зашло.Orion9 писал(а): Я так понял, что это сделали примочку для внешних движков. Vbs это не касается.
Если его не прописывать, то будут кракозябры вместо русских имен.Его вообще можно не прописывать
Теперь понятно. Вы как Штирлиц. Пытать вас приходитсяOrion9 писал(а): Если его не прописывать, то будут кракозябры вместо русских имен.
Для правильной работы мне потребовалось указать этот ключ и в скрипте сделать вывод в stdout в кодировке 650001. Все другие варианты - либо ANSI, либо кракозябры.
Я это с первого раза понял и тестирую au3.Orion9 писал(а): Колонка с vbs-скриптом у меня работает нормально
Работе не мешает, но использовать такой вывод несерьезно.Orion9 писал(а): А что такое WSA и почему вы его ловите?
А, кажется, увидел. Появляется такая надпись перед заполнением данных, но работе не мешает.
Ну откуда же я знал, что вы на au3 пишите?Я это с первого раза понял и тестирую au3
Говорил же вам верните скрипт ) Хотя если он на AutoIt, то в нем я совершенное не силен.
Да.Но я понял надо кодовую страницу вывода задать?
Код: Выделить всё
FileEncoding 65001
content := filenameСпасибо. Я думал вы на au3 пишите. Придется самому разбираться.Orion9 писал(а): В Autohotkey
Какая разница на каком языке писать, если понимаешь алгоритмы программирования. В свое время был у нас препод, который толком не знал, какую кнопку на компе нажать. Но его одного взяли в совместное предприятие и он на премию за алгоритмы купил квартиру, обставил ее. Естественно и женщина хорошая сразу нашлась. А крутые кодеры так и продолжали за зарплату на кнопки давить.Orion9 писал(а):AutoIt, то в нем я совершенное не силен.
Я знаком с Autohotkey V2, но даже чтение скриптов, написанных на Autohotkey V1, может вызывать серьезные трудности из-за отличий в синтаксисе. И все же, когда я просил вас вернуть удаленный скрипт, я надеялся посмотреть на его алгоритм, прежде всего. Что вы хотите вытянуть из консольной утилиты?Какая разница на каком языке писать, если понимаешь алгоритмы программирования.
Именно из-за этого я от него отказался. Не смог создать тестовый скрипт на версии 2. Решил, что в дальнейшем запутаюсь в нем.Orion9 писал(а): Я знаком с Autohotkey V2, но даже чтение скриптов, написанных на Autohotkey V1, может вызывать серьезные трудности из-за отличий в синтаксисе.
Я выше написал, где скрипт лежит. А у меня его нет. Он давно уже изменен.Orion9 писал(а):когда я просил вас вернуть удаленный скрипт, я надеялся посмотреть на его алгоритм, прежде всего.
Из консольной ничего не вытянешь. Потому что она мелькает при работе. Поэтому приходится использовать библиотеку. А значит использовать либо au3, либо ahk.Orion9 писал(а):Что вы хотите вытянуть из консольной утилиты?
Я на VBS со сторонними утилитами обычно вытягиваю не через StdOut, а через временный файл, вызов примерно такой:AkulaBig писал(а):Из консольной ничего не вытянешь. Потому что она мелькает при работе.
Код: Выделить всё
program="%commander_path%\...\program.exe"
WshShell.run "cmd /c """"" & program & """ -params""" & """>""" & txtfile & """", 0, TrueНу так что вы хотели вытянуть-то?AkulaBig писал(а):Поэтому приходится использовать библиотеку. А значит использовать либо au3, либо ahk.
Рабочий способMonarch-LFV писал(а):А потом закидываю в переменную (<=32768) содержимое текстового файла, его удаляю, а с переменной делаю парсинг построчно на предмет нужной информации. Никакого окна не мелькает.
Ну а что можно вытянуть из MediaInfo? Тестирую разные способы получения информации и программирование на разных скриптовых языках.Orion9 писал(а): Ну так что вы хотели вытянуть-то?
Отдельно пробовал этот метод. Смущает, что надо создавать временный файл. Надо будет попробовать в составе скрипта. Хотя сначала надо будет попробовать использовать всякие прожки, скрывающие вывод.Orion9 писал(а):Рабочий способ
Код: Выделить всё
RunWaitOne(command) {
local sOut
dhw := A_DetectHiddenWindows
pid :=0
DetectHiddenWindows true
Run A_ComSpec " /k",, "Hide", &pid
WinWait "ahk_pid " pid
DllCall("AttachConsole", "UInt", pid)
DetectHiddenWindows dhw
shell := ComObject("WScript.Shell")
exec := shell.Exec(A_ComSpec . " /C " . command)
sOut := exec.StdOut.ReadAll()
DllCall("FreeConsole")
if ProcessExist(pid)
ProcessClose pid
return sOut
}