Skip navigation.

digital-nation

Blog-note d'un informaticien procrastinate...

AutoIt : rechercher sur Google

, ,

Pourquoi n'y ai-je pas pensé avant ?

#Include <IE.au3>

Dim $s_iptBox
$s_iptBox = InputBox("Recherche Google","Que désirez-vous chercher sur Google ?")
_GoogleSearch($s_iptBox)
Exit

Func _GoogleSearch($strSearch)
    Local $o_IE
    $strSearch = StringReplace($strSearch," ","+")
    $o_IE = _IECreate ("http://www.google.com/search?hl=en&q=" & $strSearch)
EndFunc


Simple, mais plutôt efficace.

AutoIt : interface convivialeCSS Naked Day

Comments

Anonymous 2. September 2009, 23:28

Anonymous writes:

Peut-être parce que c'est avec Internet Explorer ;)

Groumphy 3. September 2009, 12:03

Certainement...
Mais c'est en plus personnalisable avec Firefox aussi... Suffit de remplacer la classe IE par un paramètre indiquant l'EXE de FF puis de transmettre la page en paramètre.

Mais ce que je pense en conclure est que l'évidence est trop simple et visible pour qu'on y pense :smile:

How to use Quote function:

  1. Select some text
  2. Click on the Quote link

Write a comment

Comment
(BBcode and HTML is turned off for anonymous user comments.)

If you can't read the words, press the small reload icon.


Smilies

December 2009
M T W T F S S
November 2009January 2010
1 2 3 4 5 6
7 8 9 10 11 12 13
14 15 16 17 18 19 20
21 22 23 24 25 26 27
28 29 30 31