Ergebnis der Suchanfrage

• Forum: Netzwerke

  Re: Webseite auslesen Error 403 forbidden

    Delphi
    by sakura, 1. Apr 2004
  Mit den Indy-Kompos wurde auf Google schon zu viel Müll getrieben und so wurden diese blockiert. Hier die einfache Lösung:
  
  procedure TForm1.Button1Click(Sender: TObject);
  begin
  idHTTP1.Request.UserAgent := 'Mozilla';
  memo1.Text := idHTTP1.Get('http://www.google.com/custom? q=blahblah&domains=www.blahblah&sitesearch=www.blahblah.de');
  end;
  
  ...:cat:...