Форумы Интермех
 ° Начало ° Ответить ° Статистика ° Регистрация ° Поиск ° RSS ° Wiki °

Форумы Интермех / Search, ImProject / Контекстное меню "Добавить в архив SEARCH" в Проводнике WINDOWS?
Автор Сообщение
producer.max
Участник
Центр

Дата: 20 Июн 2007 11:10:37


Как сделать? Может 9-ая версия автоматически добавляет похожую функцию?

Jk
Участник
НПП Интермех

Дата: 20 Июн 2007 12:52:41


9-ая версия такого не добавляет.

Можно написать такой плагин самому используя API Search.

Антон Л
Участник
Санкт-Петербург

Дата: 21 Июн 2007 11:51:23


Можно реализовать без проблем,
имеется похожая разработка

Andrei
Участник
Калуга, ОАО Тайфун

Дата: 21 Июн 2007 17:15:17


Антон Л
Говори, не томи!

Антон Л
Участник
Санкт-Петербург

Дата: 21 Июн 2007 21:24:42


всем кому интересно стучи в аську...
или на mail: antonio_s2004@rambler.ru

Andrei
Участник
Калуга, ОАО Тайфун

Дата: 2 Июл 2007 16:15:31


Антон Л
Спасибо, все заработало. Из Проводника или TotalComander файлы забрасываются в Search!

djrandom
Участник
Хроматэк, Йошкар-Ола

Дата: 24 Авг 2007 16:00:32


а для SEARCH 8.2 такое возможно?

Jk
Участник
НПП Интермех

Дата: 24 Авг 2007 17:21:39 ° Поправил: Jk


Насколько я понимаю по минимуму должна использоваться API функция LogFileInArchive которая есть в Search с эээ незапамятных времен.
Так что - да и для 8.2 и для 7, и даже для 6-ой версии такое возможно.

а в общем такое легко реализуется на VBScript
сделайте текстовый файл c:\LogFileInArchive.vbs
со следующим содержимым (без "---"):
---------------
if WScript.Arguments.Count > 0 Then
  file = WScript.Arguments(0)
  'MsgBox file  'debug
  Set SApp = WScript.CreateObject("S4.TS4App")
  k = SApp.Login
  if k = 1 then
    SApp.LogFileInArchive file
  end if
end if
---------------


далее создайте файл c:\sss.reg
со следующим содержимым:
---------------
Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\*\shell]

[HKEY_CLASSES_ROOT\*\shell\log2search]
@="Зарегистрировать в Search"

[HKEY_CLASSES_ROOT\*\shell\log2search\command]
@="wscript.exe c:\\LogFileInArchive.vbs \"%1\""

---------------


далее в проводнике надо щелкнуть дважды на файл c:\sss.reg - и занести его в реестр.
после этого в контекстном меню на любом файле появится команда "Зарегистрировать в Search".

PS. Эта команда будет работать только если Search уже запущен.
PPS. Для работы требуется Windows Script Host он как правило везде есть начиная с Windows 2000.

LP
Участник
г. Владивосток

Дата: 6 Сен 2007 03:04:27


Если текст скрипта сделать таким:
-----------------------------------------
if WScript.Arguments.Count > 0 Then
filet = WScript.Arguments(0)
'MsgBox file 'debug

set SApp = WScript.CreateObject("S4.TS4App")

do ' цикл который позволяет подождать пока система не залогинется
k = SApp.Login() ' ф-ия сёча которая при удачном логине возвращает 1
loop until k=1

if k = 1 then
SApp.LogFileInArchive filet ' регистрация файла в архиве
end if

end if
-----------------------------------------------
то тогда можно работать и без запушенного SEARCH, только у меня в обоих случаях при занесении длинна имени файла обрезается до 8 символов, а длинна расширения файлов до 3 символов. И русские символы заменяются на какую-то ерунду. Хотя может это огрех моего Windows Script Host.

Jk
Участник
НПП Интермех

Дата: 6 Сен 2007 10:50:30 ° Поправил: Jk


Только этот скрипт зависнет/упадет с ошибкой если пользователь нажмет "отмена" в окне ввода пароля.

Ваш ответ

Bold Style  Italic Style  Underlined Style  Image Link  Insert URL 
...



Перед отправкой "нелатинского" текста проверьте кодировку броузера!
 » Логин  » Пароль 
 

На форуме сейчас: гостей - 1
пользователей - 0
Наибольшее количество посетителей: 87 [1 Янв 2017 02:23:26]
гостей - 87 / пользователей - 0


miniВВ © 2001-2021