1

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

Это особенно полезно, когда я хочу сослаться на тему википедии или на веб-сайт программного обеспечения на stackoverflow ... и т.д.

1 ответ1

1

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

Сохраните следующее как Googlesearch.ahk и запустите его, используя autohotkey

; Search google for the highlighted word
; then get the first link address and put it on the Clipboard

^!r:: Reload

#+g::
    bak = %clipboard%
    Send, ^c
    ;clipboard = %bak%`r`n%clipboard%
    Query = %clipboard%
    wb := ComObjCreate("InternetExplorer.Application")
    ;wb := IEGet()
    wb.Visible := false
    wb.Navigate("www.google.com/search?q=" Query)
    While wb.readyState != 4 || wb.document.readyState != "complete" || wb.busy ; wait for the page to load
      sleep 100
    ; loop % (Nodes := wb.document.getElementById("rso").childNodes).length
    ;     Links_urls .= (A_index = 1) ? Nodes[A_index-1].getElementsByTagName("a")[0].href : "`n" . Nodes[A_index-1].getElementsByTagName("a")[0].href
    ; Msgbox %Links_urls%

    Nodes := wb.document.getElementById("rso").childNodes
    First_link := Nodes[0].getElementsByTagName("a")[0].href
    Clipboard = %First_link%
    TrayTip, First Link on Google Search, %First_link% `r`n Ctrl+V to paste the link
return

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .