Иконка ресурса

Поиск в Google & Yandex по имени объекта из контексного меню проводника 0.3

Dragokas

Very kind Developer
Команда форума
Супер-Модератор
Разработчик
Клуб переводчиков
Сообщения
6,132
Реакции
5,907
Баллы
648
Ложишь sigcheck.exe рядом с батником.
Перетягиваешь проверяемый объект на батник.
Батник с исправлением ошибок в путях.
 

Вложения

Кирилл

Команда форума
Администратор
Сообщения
13,821
Реакции
6,166
Баллы
913
Так может скрестим и выведем новый вид?:Spiteful:
 
Последнее редактирование:

Dragokas

Very kind Developer
Команда форума
Супер-Модератор
Разработчик
Клуб переводчиков
Сообщения
6,132
Реакции
5,907
Баллы
648
Смотри, чтобы новый вид не съел разработчика :Biggrin:
Как ты себе это представляешь (результат)?
 

Кирилл

Команда форума
Администратор
Сообщения
13,821
Реакции
6,166
Баллы
913
В смысле как?
В меню поиск в яндекс/гугле и отчет на вт.
Хотя наверное это будет лишним.
Надо подумать.
 

vavun

Активный пользователь
Сообщения
117
Реакции
50
Баллы
198
Уж сколько времени пользуюсь, а впервые выбрал для поиска файл с русскими буквами в названии

В данном случае демонстрация попытки поискать Пакетный файл Windows.bat

Гугл
Снимок.PNG


Яндекс
Снимок3.PNG

DuckDuckGo
Снимок2.PNG

В оригинале кодировка получается 866, пробовал менять не 1251 - безрезультатно

Как быть ? )
 

Кирилл

Команда форума
Администратор
Сообщения
13,821
Реакции
6,166
Баллы
913
Не понял,не ищет вообще ничего на русском?

Не могу воспроизвести проблему,можешь подробнее рассказать?

upload_2015-12-22_21-56-40.png
 

vavun

Активный пользователь
Сообщения
117
Реакции
50
Баллы
198
Не ищет конкретно гугл и конкретно на русском. Firefox 25-ый

VB.NET:
CreateObject("WScript.Shell").Run "explorer ""https://google.ru/search?ie=UTF-8&hl=ru&q=" & Arg & """"
После изьятия из строки ie=UTF-8&hl=ru& стало искать нормально.

Теперь воюю только с DuckDuckGo )
 
Последнее редактирование:

Кирилл

Команда форума
Администратор
Сообщения
13,821
Реакции
6,166
Баллы
913
А в браузере кодировка какая стоит?
 

vavun

Активный пользователь
Сообщения
117
Реакции
50
Баллы
198
utf-8
хм ..

DuckDuckGo портит поиск только если кирилический символ в верхнем регистре и не важно в каком месте
 

Кирилл

Команда форума
Администратор
Сообщения
13,821
Реакции
6,166
Баллы
913
Очень странно.
На выходных попробую воспроизвести с указанным ПО и разобраться.
 

vavun

Активный пользователь
Сообщения
117
Реакции
50
Баллы
198
Закон подлости: по факту нужен только DuckDuckGo, и именно он не работает, как нужно )

Еще хотел спросить: а для чего
Код:
"explorer ""https://google.ru/search?ie=UTF-8&hl=ru&q=" & Arg & """"
А не просто
Код:
"https://google.ru/search?ie=UTF-8&hl=ru&q=" & Arg & ""
?

Так оно даже отзывается немного шустрее
Вопрос с duckduckgo решил при помощи LCase

VB.NET:
On Error Resume Next
if WScript.Arguments.Count = 0 then WScript.Quit
Arg = WScript.Arguments(0)
Arg = LCase(Arg)
Arg = Mid(Arg, InStrRev(Arg, "\") + 1)
Arg = Replace(Arg, " ", "%20")
set ShellApp = CreateObject("Shell.Application")'*/
CreateObject("WScript.Shell").Run "https://duckduckgo.com/?q=" & Arg & ""
 

Кирилл

Команда форума
Администратор
Сообщения
13,821
Реакции
6,166
Баллы
913
vavun, так получается сейчас и там и там нормально?
 

vavun

Активный пользователь
Сообщения
117
Реакции
50
Баллы
198
Koza Nozdri, вроде да )

На данный момент у меня два поисковика.
Основной duckduckgo и google "спрятан под shift"
Скрипты почти без изменений

VB.NET:
On Error Resume Next
if WScript.Arguments.Count = 0 then WScript.Quit
Arg = WScript.Arguments(0)
Arg = LCase(Arg)
Arg = Mid(Arg, InStrRev(Arg, "\") + 1)
Arg = Replace(Arg, " ", "%20")
set ShellApp = CreateObject("Shell.Application")'*/
CreateObject("WScript.Shell").Run "https://duckduckgo.com/?q=" & Arg & ""
VB.NET:
On Error Resume Next
if WScript.Arguments.Count = 0 then WScript.Quit
Arg = WScript.Arguments(0)
Arg = Mid(Arg, InStrRev(Arg, "\") + 1)
Arg = Replace(Arg, " ", "%20")
set ShellApp = CreateObject("Shell.Application")'*/
CreateObject("WScript.Shell").Run "https://encrypted.google.com/search?&q=" & Arg & ""
Больше проблем не было.
 

vavun

Активный пользователь
Сообщения
117
Реакции
50
Баллы
198
Koza Nozdri, и вообще, фанаты жаждут обновления :Bye:
Учитывая, что "уточка" набирает популярность вероятно это имеет смысл.
+ имело бы смысл добавить везде https.
У кого то на гуглах и яндексах еще почты водятся (например у меня), так что перестраховаться не помешает )

В общем, было бы здорово :Blush2:

Еще я тут новые иконки принес ))
 

Вложения

regist

гоняюсь за туманом
Ассоциация VN/VIP
VIP
Разработчик
Сообщения
12,335
Реакции
5,960
Баллы
998
С https могут быть у некоторых проблемы так что не стоит. Да и смысл использовать для поиска нет. А те кто используют там почту врядли пишут письмо и отправляют туда через это контекстное меню.
P.S. если будет обновление, то and надо писать через "a".
 

vavun

Активный пользователь
Сообщения
117
Реакции
50
Баллы
198
С https могут быть у некоторых проблемы так что не стоит
хм ... например ?

Я сейчас глянул, и гугл и яндекс и утка сами перенаправляют на https. Так что да. Смысла и правда нет.
 

rtrtrt

Новый пользователь
Сообщения
5
Реакции
1
Баллы
13
Kиpилл, Здравствуйте. Подскажите, пожалуйста, по этой программе "Поиск в Google и Yandex из контекстного меню проводника". Помогите, пожалуйста, как сделать чтобы новый пункт в меню добавлялся не в само контекстное меню, а в пункт "Отправить" SendTo. То есть всё тоже поиск в гугл и яндекс.

К сожалению, я вообще не понимаю, как код адаптировать под SendTo. Мне не понятно, что нужно написать, какой нужно написать код, чтобы данный поиск заработал через SendTo.
Кирилл, помогите, пожалуйста.
 

Кирилл

Команда форума
Администратор
Сообщения
13,821
Реакции
6,166
Баллы
913
rtrtrt, доброе утро.
С работы приеду и сделаю как вам надо,сегодня.
Может ребята меня опередят с ответом)
Система у вас какая только сообщите.
 
Последнее редактирование:

Кирилл

Команда форума
Администратор
Сообщения
13,821
Реакции
6,166
Баллы
913
rtrtrt, держите - как обещал.

Сохраните файл KozaN.vbs в паку %userprofile%
Затем откройте эту папку и нажмите правой кнопкой мыши на файле KozaN.vbs и выберите в контексном меню пункт "Создать ярлык".
Затем открываете папку shell:sendto (Правой кнопкой мыши на меню Пуск - Выполнить - shell:sendto - клавиша Enter) и копируете в эту папку ярлык KozaN.lnk (который вы только что создали)
Затем нажимаете на этом ярлыке правой кнопкой мыши - переименовать - и задаете удобное наименование,например "Поиск в Google".
Затем еще раз правой кнопкой мыши на ярлыке - сменить значок - выбираете в папке %userprofile% файлик ico, например google.ico
Файлы ico прикрепил к сообщению,на ваш выбор.

Как настроить поиск?
Если вам нужен поиск в Яндекс - то больше ничего не делайте.
Если в Google - то откройте с помощью блокнота файл KozaN.vbs и замените строку:

Код:
CreateObject("WScript.Shell").Run "explorer ""http://yandex.ru/yandsearch?text=" & Arg & """"
На строку
Код:
CreateObject("WScript.Shell").Run "explorer ""https://google.ru/search?ie=UTF-8&hl=ru&q=" & Arg & """"
А если поиск в DuckDuckGo,то на строку:
Код:
CreateObject("WScript.Shell").Run "explorer ""https://duckduckgo.com/?q=" & Arg & """"

Все,пользуйтесь.
Что не получится - пишите.
Я вам готовый ярлык специально создавать пока не стал - что бы сами руками пощупали что где лежать будет.
На всякий случай.

Скачать ico.zip
http://www.fayloobmennik.net/6825791
p.s. а у меня еще просьба к другим пользователям - по просьбе трудящихся решил сделать апгрейд небольшой,и у меня че то иконка DuckDuckGo не показывается.
Просьба проверьте кто может как у вас,скрипт в архиве по ссылке

Скачать Google end Yandex search.rar
 
Сверху Снизу