Einzelnen Beitrag anzeigen

peterbelow

Registriert seit: 12. Jan 2019
Ort: Hessen
672 Beiträge
 
Delphi 11 Alexandria
 
#16

AW: Ausführen von Google Suchen

  Alt 23. Mai 2022, 16:36
Ich möchte nachdem die Google Suche stattgefunden hat, diese vom Inhalt überprüfen.
Zum Beispiel möchte ich sagen feststellen:
Webseite: diesewebseite.de
enthält: 27 PDF Dokumente

Diese muss ich nicht direkt in einem Objekt in meinem Programm direkt anzeigen.
Der Umweg über die Ausgabe der Google Suche in eine Datei mit anschließender Analyse, was die Suche gefunden hat, meine ich könnte sich einfacher gestalten.

Jetzt kommt es wieder:
Das Ausgeben in eine Datei bekomme ich nicht hin.
Mit >> Pfad\Dateiname, sollte es eigentlich gelingen.
Hier ein Beispiel, welche nicht funktioniert. Ich habe endlos viele Stellen getestet, die gehen alles nicht.
Leider finde ich keine Stelle, wo ich die Umleitung einbauen kann, damit Delphi die auch ausführen kann.

ShellExecute( Handle, 'OPEN', PWideChar( 'https://google.com/search?q=' + TURI.URLEncode( 'site:'+edit1.text+ ' '+ 'filetype:doc' ) ),>> c:\test\tt.txt NIL, NIL, SW_SHOWMAXIMIZED );

Vielleicht fehlt auch wieder nur irgendein Hochkomma.....?

Viele Grüße
JimmyB
Wieso glaubst Du das könnte funktionieren? Zum einen ist redirection eine Funktion des Kommand-Prozessors (cmd.exe), nicht von ShellExecute. Zum anderen kann man nur etwas redirecten, was das gestartete Programm auf stdout ausgibt. Das tut der Browser aber nicht, und den startet ShellExecute um deinen https request auszuführen.

Man kann zwar die erste Ergebnisseite im Browser selektieren (Strg-A), ins Clipboard kopieren (Strg-C) und von dort extrahieren (sText := Clipboard.AsText; ), aber das gibt wirklich plain text, kein HTML, d.h. auch keine Möglichkeit, Links zu identifizieren und zu verfolgen.
Peter Below
  Mit Zitat antworten Zitat