Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   [решено] Скрипт для поиска в интернете текста который находится в буфере обмена (http://forum.oszone.net/showthread.php?t=351822)

denis19 02-09-2022 11:05 2991571

Скрипт для поиска в интернете текста который находится в буфере обмена
 
Есть такой скрипт, копируешь текст, нажимаешь и тебя перебрасывает в поисковик с уже вбитым туда этим текстом, который в буфере обмена. Но проблема, в поисковик вставляется только одно первое слово из всей фразы. Вся фраза будет только если скопированный текст изначально был слитный без пробелов.
Что подправить в скрипте чтоб искал всю фразу из буфера с раздельными словами?
Dim objWshShell
clipboard = CreateObject("HTMLFile").parentWindow.clipboardData.getData("text")
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

DJ Mogarych 02-09-2022 17:56 2991601

Создаёте файл search.ps1 со следующим содержимым:
Код:

start "https://yandex.ru/search/?text=$(Get-Clipboard)"
Создаёте ярлык, в свойствах которого в поле "Объект" вводите
Код:

powershell -f "C:\путь\к\search.ps1"
Далее копируете в буфер, что вам нужно, и запускаете ярлык.

denis19 03-09-2022 09:51 2991635

Я никогда powershell не пользовался, мало в этом понимаю. Но вроде получилось, и запускаю не ярлык, а созданный файл search.ps1 с этой командой внутри. Вроде нормально. Но вот маленькая проблемка, перед тем как перепрыгнуть в поисковик с текстом, то окошко командной строки очень долго висит, секунд 7-10. Можно ли исправить чтоб быстрее?

DJ Mogarych 03-09-2022 10:30 2991641

Это зависит от быстродействия компьютера.
Попробуйте в ярлыке добавить параметр
Код:

-WindowStyle hidden
А можно в свойствах ярлыка пункт "Окно" переключить на "Свернутое в значок".

denis19 03-09-2022 10:46 2991644

А где именно в команде, как команда целиком будет выглядеть?

dmitryst 03-09-2022 12:04 2991653

Код:

powershell -WindowStyle hidden -f "C:\путь\к\search.ps1"

denis19 03-09-2022 12:33 2991655

Да, вот так нормально насчёт окна. Даже ещё нашёл, скрытые ещё можно делать скриптом, путь в него вставлять
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) & "C:\Users\Admin\Desktop\search.ps1" & Chr(34), 0
Set WshShell = Nothing
Но вот перехожу в поисковик всё так же медленно, жду несколько секунд. Видать да, от быстродействия компа зависит.
Но спасибо, работает. :yes:

Serguei Kouzmine 03-09-2022 19:34 2991669

хожу в поисковик всё так же медленно, жду несколько секунд - ну дак
windows автоматизация на основе Powershell вообще небыстрая


Время: 23:51.

Время: 23:51.
© OSzone.net 2001-