
¿Hay alguna manera de obtener la primera URL del texto resaltado de Google? Es como si tuviéramos búsqueda integrada por teclado en móviles pero no en ordenadores de sobremesa.
Es especialmente útil cuando quiero vincular un tema de Wikipedia o un sitio web de software en stackoverflow... etc.
Respuesta1
Acabo de crear una forma sencilla de hacerlo. No es el mejor pero por el momento me funciona bastante bien. No lo personalicé para que coincidiera con el formato de stackoverflow porque lo quería flexible por ahora. Lo publicaré en github más tarde. Probablemente sea necesario mejorarlo para que realmente funcione.
Guarde lo siguiente como Googlesearch.ahk y ejecútelo usandotecla de acceso automático
; 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