Обсуждение вопросов автоматизации Total Commander с помощью сторонних программ и скриптовых технологий.
Модераторы: d-view , Моторокер , Avada , CaptainFlint , Nik
Batya
Сообщения: 2236 Зарегистрирован: Ср дек 15, 2004 09:51
Откуда: Москва, Россия
Сообщение
Batya » Ср окт 12, 2011 10:39
Что-то у меня копирование через IE иногда криво работает.
Исправил скрипт - если зарегистрирован TCWSHelper, то копирование выполняется через него.
Нет, я не сплю. Я просто медленно моргаю.
sa
Сообщения: 2758 Зарегистрирован: Ср апр 29, 2009 18:56
Сообщение
sa » Ср окт 12, 2011 14:27
Flasher писал(а): Ну, логично. Одно с другим не вяжется. Двух зайцев сразу.
Просто в редакции скрипта от
Batya твоя фича исчезла, а недочёт с вылетом скрипта на [..] появился.
Flasher
Сообщения: 14229 Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва
Сообщение
Flasher » Ср окт 12, 2011 14:41
Batya писал(а): Что-то у меня копирование через IE иногда криво работает.
Странно. А ты из под админа запускаешь?
sa
Можешь заменить
на
Код: Выделить всё
If WSCript.Arguments.Count = 2 Then Clip = Mid(T, 1, Len(T) - 2) Else Clip = WSCript.Arguments(0)
Text2Clip Clipи прописать второй параметр.
Хотя я бы там немного по-другому сделал в целом, ну, да ладно. Бате, видимо, это не надо.
sa
Сообщения: 2758 Зарегистрирован: Ср апр 29, 2009 18:56
Сообщение
sa » Ср окт 12, 2011 15:05
Flasher писал(а): Можешь заменить
Да я то пока и своим скриптом обхожусь.
Batya
Сообщения: 2236 Зарегистрирован: Ср дек 15, 2004 09:51
Откуда: Москва, Россия
Сообщение
Batya » Ср окт 12, 2011 15:22
Flasher писал(а): Странно. А ты из под админа запускаешь?
Конечно. Просто если IE уже открыт, может долго думать и не менять ключ реестра.
sa писал(а): Просто в редакции скрипта от Batya твоя фича исчезла, а недочёт с вылетом скрипта на [..] появился.
Мой скрипт работает для выделенных файлов. Один (текущий) файл - это частный случай. Глюк с очисткой
всех параметров при наличии %L в параметрах и запуске с [..] - это очень старая бага TC. Почему-то Гислер никак не хочет это исправить.
Flasher писал(а): Можешь заменить ... и прописать второй параметр.
Не поможет. Как я уже написал, здесь глюк TC -
все параметры очищаются.
Нет, я не сплю. Я просто медленно моргаю.
Flasher
Сообщения: 14229 Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва
Сообщение
Flasher » Ср окт 12, 2011 15:27
Batya писал(а): Конечно. Просто если IE уже открыт, может долго думать и не менять ключ реестра.
А, да? Я про это вообще не знал. На IE только Листерами (HTMLView, IEView) пользуюсь. Надо будет потестить.
Batya писал(а): Не поможет. Как я уже написал, здесь глюк TC - все параметры очищаются.
Это так с параметрами, создающими файлы списка? С другими этого бага нет?
Batya
Сообщения: 2236 Зарегистрирован: Ср дек 15, 2004 09:51
Откуда: Москва, Россия
Сообщение
Batya » Ср окт 12, 2011 15:30
Flasher писал(а): Это так с параметрами, создающими файлы списка? С другими этого бага нет?
Да. Да.
Нет, я не сплю. Я просто медленно моргаю.
sa
Сообщения: 2758 Зарегистрирован: Ср апр 29, 2009 18:56
Сообщение
sa » Ср окт 12, 2011 15:33
Batya
А если просто
Код: Выделить всё
If WScript.Arguments.Count < 1 Then
Wscript.Quit
Else
Flasher
Сообщения: 14229 Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва
Сообщение
Flasher » Ср окт 12, 2011 15:43
Вообще обмануть эту фигню можно просто. Банально дописывать в поле после %L символ и брать Left(%L, Len(%L)-1). Ну, вы меня поняли.
Batya
Сообщения: 2236 Зарегистрирован: Ср дек 15, 2004 09:51
Откуда: Москва, Россия
Сообщение
Batya » Ср окт 12, 2011 16:01
sa писал(а): Batya
А если просто
Если дело только в том, чтобы не выскакивала ошибка, тогда - да, это просто.
Flasher писал(а): Вообще обмануть эту фигню можно просто. Банально дописывать в поле после %L символ и брать Left(%L, Len(%L)-1). Ну, вы меня поняли.
Честно говоря, не понял.
Нет, я не сплю. Я просто медленно моргаю.
sa
Сообщения: 2758 Зарегистрирован: Ср апр 29, 2009 18:56
Сообщение
sa » Ср окт 12, 2011 16:06
Batya писал(а): Если дело только в том, чтобы не выскакивала ошибка
Конечно: ту фичу пока никто не запрашивал.
P.S.
Кстати, и мой скрипт работает для выделенных файлов.
Flasher
Сообщения: 14229 Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва
Сообщение
Flasher » Ср окт 12, 2011 16:27
Batya писал(а): Если дело только в том, чтобы не выскакивала ошибка, тогда - да, это просто.
И это тоже просто:
Код: Выделить всё
If WSCript.Arguments.Count > 0 Then
T = Replace(CreateObject("Scripting.FileSystemObject").OpenTextFile(WScript.Arguments(0), 1).ReadAll, "" + chr(13), chr(13))
Clip = Mid(T, 1, Len(T) - 2)
Else Clip = CreateObject("WScript.Shell").CurrentDirectory
End If
Text2Clip ClipПуть запуска очистить.
Batya писал(а): Честно говоря, не понял.
Уже проверил, он не только параметры убивает, но и любые символы, записанные в поле.
Batya
Сообщения: 2236 Зарегистрирован: Ср дек 15, 2004 09:51
Откуда: Москва, Россия
Сообщение
Batya » Ср окт 12, 2011 18:18
Flasher писал(а): Уже проверил, он не только параметры убивает, но и любые символы, записанные в поле.
Так и я про то же - любые символы это тоже параметры кнопки\команды.
Нет, я не сплю. Я просто медленно моргаю.
Flasher
Сообщения: 14229 Зарегистрирован: Пт ноя 06, 2009 00:33
Откуда: Москва
Сообщение
Flasher » Ср окт 12, 2011 18:33
Batya
Я думал ты про предопределённые. Добавлять предложенное выше будешь?
sa
Сообщения: 2758 Зарегистрирован: Ср апр 29, 2009 18:56
Сообщение
sa » Ср окт 12, 2011 23:38
Flasher писал(а): Чтобы при постановке на [..] копировался путь к родительскому каталогу. Типа фича.
Вообще-то к
текущему каталогу.