denis19
25-10-2023, 15:58
Здравствуйте, уже есть подобный скрипт, тот ищет текст который находится в буфере обмена, сразу перекидывает в поисковик с уже убитым текстом. Надо аналог, чтоб в поисковик вбивал картинку, и там тоже выпадал список похожих фото. Работало чтоб, либо когда фотография в буфере обмена, потом запустить скрипт, либо искать из контекстного меню при наведении на фото, будет кнопка в реестр. Это как в браузерах меню поиск по фото. Вот парочку команд вытащил из расширений. Но с компа они лишь откроют пустой поисковик
https://yandex.com/images/search
https://yandex.ru/images/search?url=%s&rpt=imageview
А вот скрипт для поиска текста.
Dim objWshShell
clipboard = CreateObject("HTMLFile").parentWindow.clipboardData.getData("text")
clipboard = Replace(clipboard, " ", "%20") '
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run "https://yandex.ru/search/?text=" & clipboard & "&clid=1836588&lr=959", 1, False
Set objWshShell = Nothing
WScript.Quit 0
-------------
Там хоть и заменить адрес на yandex.ru/images, это ничего не исправит.
https://yandex.com/images/search
https://yandex.ru/images/search?url=%s&rpt=imageview
А вот скрипт для поиска текста.
Dim objWshShell
clipboard = CreateObject("HTMLFile").parentWindow.clipboardData.getData("text")
clipboard = Replace(clipboard, " ", "%20") '
Set objWshShell = WScript.CreateObject("WScript.Shell")
objWshShell.Run "https://yandex.ru/search/?text=" & clipboard & "&clid=1836588&lr=959", 1, False
Set objWshShell = Nothing
WScript.Quit 0
-------------
Там хоть и заменить адрес на yandex.ru/images, это ничего не исправит.