powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Как добавить пункт в контекстное меню IE?
24 сообщений из 24, страница 1 из 1
Как добавить пункт в контекстное меню IE?
    #35328996
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здравствуйте уважаемые!

Вот какая есть тема:

Мы занимаемся аналитической работой, в т.ч. поиском. Но данные мы собираем от всяких разных пользователей, которых много. Пользователи другими делами заняты, но по роду дел роются в интернете и что-то находят. Но это что-то либо смотрят, используют и забывавают. А нам было бы желательно знать, где они нашли что-то интересное.

Пользователи не против нам помочь, но им некогда и неудобно слать кучу ссылок.

Поэтому есть две идеи:

1. Сделать PlugIn под IE, который бы фиксировал все переходы пользователя, т.к. способ. которым пользователь попал в интересное место не менее важен, чем само место.

2. Сделать PlugIn под IE, который добавил бы пункт в контекстное меню окна IE - что-то типа -

<b> - сохранить тек. ссылку в базе данных </b>

Если пользователь кликает на этот пункт, то должна вызываться некая программа, которая берет тек. адрес как аргумент и зарашивает пользовательский комментарий. Потом все это пихает в базу.

Все под IE7/IE8.
База - SQL Server 2000/2005.

Никогда ничего подобного не делал (вообще - больше по базам данных), потому прошу - подскажите место(а) где почитать, а еще лучше - хоть какой-то пример кода.

Всем удачи,
AVVS
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329289
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1) Для этого Plugin не обязателен, достаточно резидентной проги, которая следит за окнами IE. Она в аттаче.
2) С этим сложнее.
3) Можно сделать тулбар .
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329330
ShSerge
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мщжно попробовать saveHistory Behavior там же саве фаторите и прочие бехавиор.
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329563
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот простейший плагин, сделанный за 5 минут. Распакуйте содержимое архива на С:\ , запустите SaveURL.reg, откройте IE, щелкните правой кнопкой мышки по страничке и выберите пункт меню "Save URL". Повторите операцию несколько раз, потом откройте файлик VisitedSites.txt. Откройте SaveURL.htm и посмотрите код.

Как работать с ADODB в vbscript объяснять не буду. :)
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329569
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329609
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Коллеги, огромное спасибо за оперативность, щас буду пробовать

Всем удачи,
AVVS
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329850
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не работает :(

Подозреваю что дело в Registry:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Windows Registry Editor Version  5 . 00 

[-HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\Save URL]

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\Save URL]
@="E:\\Users\DATABASES\PTASQL\VBScript_AddOns\IE_PlugIns\SaveURL.htm"
"Flags"=dword: 00000000 
"Contexts"=dword: 00000011 

После загрузки параметр @ в registry не появился.
Добавил руками:

Код: plaintext
1.
@E:\\Users\DATABASES\PTASQL\VBScript_AddOns\IE_PlugIns\SaveURL.htm

Но похоже криво.

Как правильно? Ни разу дела не имел, а по MSDN не знаю где искать.
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329882
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
@E:\\Users\\DATABASES\\PTASQL\\VBScript_AddOns\\IE_PlugIns\\SaveURL.htm
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329889
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ага, я уже сам допер.

Но!
Вместе со ссылкой хочется, чтобы пользователь указал комментарий.

Но вот этот фрагмента вызывает ошибку:

Код: plaintext
1.
2.
3.
4.
5.
            Dim strText 
		
                strURL = window.external.menuArguments.document.URL
                strText = InputBox("Enter URL Comment...")


Ругается, что InputBox Permission Denied.

тестирую на W2003 Server. Рабочие машины - XP/Vista

Спасибо за помощь!

AVVS
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329893
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Длбавте:

Код: plaintext
1.
2.
3.
4.
...
strDescription = Trim(window.prompt("Enter Description:",""))
...
If Len(strDescription) Then objTS.WriteLine vbTab & strDescription
...
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329899
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У-р-р-р-р-ааааа
За-р-р-р-р-аботало!

Многия спасибы!!!
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329935
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Еще вопрос - а где про Registry почитать можно?
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35329942
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Наберите в любом поисковике (можно прямо на MSDN) WScript.Shell RegWrite (regRead, regDelete)
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35334286
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Проблема совместимости :(

под IE6 все работает.
под IE7 - блокируется подсказка, в которой пользователь должен ввести комментарий к сохраняемой ссылке.

файл SaveUrl.htm лежит на локальной машине.
Проблема с Information Bar. Как отключить блокировку windows,prompt()?
Проблема в том, что эта функция по умолчанию заблокирована.
F1 читал. Сделал как написано. Не берет.

Всем удачи!

AVVS
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35334569
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Разрешать запуск активного содержимого файлов на моем копьютере:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Windows Registry Editor Version  5 . 00 

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_LOCALMACHINE_LOCKDOWN]
"iexplore.exe"=dword: 00000000 

[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_LOCALMACHINE_LOCKDOWN\Settings]
"LOCALMACHINE_CD_UNLOCK"=dword: 00000000 

Или скриптом:
Код: plaintext
1.
2.
Set WshShell = CreateObject("WScript.Shell")

WSHShell.RegWrite "HKCU\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_LOCALMACHINE_LOCKDOWN\iexplore.exe", "0", "REG_DWORD"

И вам того же :)
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35334678
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Уф-ф-ф-ф

Спасибо!
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35334713
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот, кстати, соответствующий раздел MSDN:

About Browser Extensions

Ну и на MSDN Forums можно порыться на предмет найти примеры.
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35335310
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
О!
Thanx ^)
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35340555
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Еще одна проблема :(

Вылезло под Vista IE7/IE8

Локальный пользователь запускает IE.

Выбирает пункт меню.

Запускается скрипт - он реально запускается.

Но этот скрипт не может открыть на запись файл, расположенный на desktop данного пользователя. Соответственно ничего не пишется!

Под XP такого не замечено.

Есть какие мысли?
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35340768
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ответ здесь:

http://]msdn.microsoft.com/en-us/library/bb250462.aspx#wpm_fliwl

Суть такова:
VISTA/IE7 and above
Под правами обчного пользователя любой скрипт, вызываемый из IE, может писать в строго ограниченное количество мест:

%USER PROFILE%\Local Settings\Temporary Internet Files\Low
%USER PROFILE%\Local Settings\Temp\Low

Проверил, пишет.

А какую registry крутить, чтоб можно было бы писать хотя бы в файлы рабочего стола - не понял.


Всем удачи,
AVVS
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35340776
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1. Висты у меня нет, как нет ни малейшего желания заниматься проблемами этого "линеолеума" :)

2. Вы ж хотели хранить в БД? Пример с файликом я привел для простоты.

3. В любом случае негоже, чтоб файлы валялись где попало. Сделайте скриптик Setup.vbs, который создаст папку, например, в Program Files, положит туда файл самого плагина и текстовый файлик, пропишет ключи и создаст на десктопе shortcut для текстового файлика. Можно простенькую HTA сделать - чтоб был сетап с интерфейсом. Все это дело 5-ти минут.

На всякий случай - shortcut создается так:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Const DESKTOP = &H10&
Set objShell = CreateObject("Wscript.Shell")
Set ShellApp = CreateObject("Shell.Application")

strFolder = objShell.SpecialFolders.Item("Desktop")
Set objShortcut = objShell.CreateShortcut(strFolder & "\Saved URLs.lnk")
objShortcut.TargetPath = "C:\Program Files\SaveURL\VisitedSites.txt"
objShortcut.Save

Set objFolder = ShellApp.NameSpace(DESKTOP)
Set objFolderItem = objFolder.ParseName("Saved URLs.lnk")
Set objShortcut = objFolderItem.GetLink
objShortcut.SetIconLocation "C:\Windows\System32\SHELL32.dll",  13 
objShortcut.Save
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35340833
AVVS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дык! У меня второй комп - Mac, и еще один под линуксом так что VISTA это - чтоб жизнь медом не казалась.

За скрипт - спасибо

За совет - тоже согласен и файловую гигиену блюду как могу.

Но аппетит получил развитие Скрипт пишет не только URL, а парсит выделенные места страницы и готовит tab-separated данные для последующей загрузки. В базу сразу опасно и не всегда это надо, т.к. парсер пишется под конкретный фрагмент и на "скорую лапу", поэтому аналитики смотрят на данные глазами перед загрузкой, т.е. грузится только то, что надо.

Еще ра
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35341154
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня корпоративный стандарт - win XP + Office 2003 + sharepoint 2003 + ie7. Везде где только можно прописал, что стабильная работа всего софта гарантируется в такой связке - если кому хочется странного - обращайтесь, платите, доработаем и протестируем. Было несколько просьб по поводу Office 2007, под него доработали. Висту никто не попросил. Ну а раз народ ее не хочет - чего ж я буду бежать впереди паровоза?
...
Рейтинг: 0 / 0
Как добавить пункт в контекстное меню IE?
    #35341697
Фотография %?*?%
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AVVSаналитики смотрят на данные глазами перед загрузкой, т.е. грузится только то, что надо

Не сообразил сразу... Для предпросмотра вовсе не нужен текстовый файл - вы можете создавать новое окно с полями для выбранного текста, URL, комментария и кнопкой "Submit" - по нажатию которой текст сохраняется в БД. Вот простенький пример.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
<HTML>
<HEAD>
<TITLE>Save URL</TITLE>
<script language="VBScript">
Set wind = window.open("", "", "toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes, resizable=yes, top=50, left=50, width=500, height=600")
wind.document.write("<TEXTAREA NAME=" & """" & "HTMLtext" & """" & "style=" & """" & "width=100%; height=100%" & """" & ">")
wind.HTMLtext.value=external.menuArguments.document.selection.createRange().Text
</script>
</HEAD>
<BODY>
</BODY>
</HTML>
...
Рейтинг: 0 / 0
24 сообщений из 24, страница 1 из 1
Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Как добавить пункт в контекстное меню IE?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]