Philipp Hasenfratz: Suchmaschinenergebnisse filtern!

Beitrag lesen

Ich soll ein Script schreiben, welches Suchmaschinenergebnisse zu einem bestimmten, immer gleichen Stichwort, automatisch in einer Datenbank speichert. Wenn ich die Suche dann eine Woche später nochmal starte, sollen die Ergebnisse von einst mit den neuen Ergebnissen verglichen werden, so dass automatisch nur die Ergebnisse in der Datenbank gespeichert werden, die in der vorherigen Suche nicht gefunden wurden.

Ich hab für alles eine Lösung gefunden, nur nicht für eins:
Wie schaffe ich es, dass mein Script eine Ergebnisseite einer Suchmaschine durchsuchen kann? Geht das mit reinem ASP?

Hallo Raphael

  1. zuerst musst du einen User-Agent generieren:
    Set HttpObj = Server.CreateObject("AspHTTP.Conn")

  2. dann die URL eingeben
    HttpObj.Url = "http://www.suche.de/query=" & keyWord

  3. dann den Request ausführen
    strResult = HttpObj.GetURL

nun ist in strResult das gesamte Ergebnis. Jetzt kannst du die Seite durchsuchen, mit Instr (Zeichenfolge in einem String suchen und dessen Position zurückgeben)

anfang = Instr(strResult, "<TD>")  ' html-code vor dem gesuchten Teil
ende = Instr(strResult, "</TD>") ' html-code nach dem    "        "
laenge = ende-anfang

if laenge>1 Then
   ausgabe = MID(strResult,anfang,laenge)
  rem eventuell noch einige Codes ausschneiden
   ausgabe=Replace(ausgabe,"<Font ...","")
   ausgabe=Replace(ausgabe,"</Font>","")
End If

Ich hoffe, dass das etwas Hilft

Philipp