Google Bildersuche

    Hallo,
    gibt es eine Möglichkeit bei der Google Bildersuche die Bilder "groß" zu öffnen?
    Also quasi die Vollbild Ansicht, damit man die mit InetGet Downloaden kann.

    Ich weiß nicht wie ich es anstellen soll.

    Im Quellcode der Google-Seite stehen doch auch alle Links zu den orginalen Bildern. Diese filterst du und lädst anschließend per inetget()

    du musst einfach an den link der Bildersuche

    Code
    #tbo=1&imgsz=l


    anfügen.
    Bsp.:

    Code
    "Original Link:"   http://images.google.de/images?q=wallpaper&oe=utf-8&rls=org.mozilla:de:official&client=firefox-a&um=1&ie=UTF-8&sa=N&hl=de&tab=wi
"Modifizierter Link:"   http://images.google.de/images?q=wallpaper&oe=utf-8&rls=org.mozilla:de:official&client=firefox-a&um=1&ie=UTF-8&sa=N&hl=de&tab=wi#tbo=1&imgsz=l

    Wer immer nur das tut, was er bereits kann - wird auch immer nur das bleiben, was er bereits ist!

    Mein bisheriger Ansatz:

    [autoit]

    #RequireAdmin
    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <Array.au3>
    #include <INet.au3>
    #include <String.au3>

    [/autoit][autoit][/autoit][autoit]

    #Region ### START Koda GUI section ###
    $Form1 = GUICreate("Cover Downloader", 523, 582, 900, 248)
    $Name = GUICtrlCreateInput("Name", 88, 72, 345, 21)
    $Label1 = GUICtrlCreateLabel("Cover Downloader", 144, 16, 239, 31)
    GUICtrlSetFont(-1, 18, 800, 0, "Lucida Fax")
    $Suchen = GUICtrlCreateButton("Suchen", 136, 104, 251, 25, $WS_GROUP)
    $Next = GUICtrlCreateButton("Nächstes", 208, 200, 115, 49, $WS_GROUP)
    $Download = GUICtrlCreateButton("Download", 216, 536, 115, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    [/autoit][autoit][/autoit][autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Suchen
    $i = "1"
    $Titel = GUICtrlRead($Name)
    $Titel = StringReplace ($Titel, " ", "+")
    $Link = "http://images.google.de/images?um=1&hl=de&tbs=isch%3A1&sa=1&q="&$Titel&"+Cover&btnG=Suche&aq=f&oq=&start=0"
    $Quelltext = _INetGetSource ($Link)
    $CoverLink = _StringBetween ($Quelltext, "src=", ".jpg")
    InetGet ($CoverLink[$i]&".jpg", @TempDir&"Cover-"&$Titel&".jpg")
    $i = $i+1
    $Pic1 = GUICtrlCreatePic(@TempDir&"Cover-"&$Titel&".jpg", 120, 272, 292, 244, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    Case $Next
    GUICtrlDelete ($Pic1)
    InetGet ($CoverLink[$i]&".jpg", @TempDir&"Cover-"&$Titel&".jpg")
    $i = $i+1
    If $i > UBound($CoverLink)-1 Then
    $i = "1"
    EndIf
    $Pic1 = GUICtrlCreatePic(@TempDir&"Cover-"&$Titel&".jpg", 120, 272, 292, 244, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    Case $Download
    InetGet ($CoverLink[$i]&".jpg", "C:\Cover-"&$Titel&".jpg")
    EndSwitch
    WEnd

    [/autoit]

    Nur die Bilder sind sehr klein! :(