PureBoard

Verfasst: **24.06.2009 18:29**

KeyKon hat geschrieben:Mit Test funzt es schon

Ach so, ich hatte nicht daran gedacht, dass Du oben schon Code gepostet hattest. Sorry!

KeyKon hat geschrieben:Per API funzt es auf jeden Fall einwandfrei:
Code: Alles auswählen
URLDownloadToFile_(0,"http://www.google.de/search?hl=de&q=Paul+C%E9zanne","C:\test.html",0,0)

Das ist ja komisch ... Das erzeugt bei mir (Windows XP) überhaupt keine Datei auf der Festplatte.

Gruß, Little John

Verfasst: **24.06.2009 18:35**

Meld, hier funzt das ganze mit dem Google-Link auch nicht, auch nicht per Api. Erhalte trotz Erfolgsmneldung nur ne abgeschnittene Datei ohne Suchergebnis.

Der Code den Google da liefert ist aber auch ne Krankheit,
wer sowas fabriziert sollte mal nen Webmasterseminar besuchen.

Bei anderen Links gehts nämlich absolut fehlerfrei.

Verfasst: **24.06.2009 19:07**

KeyKon hat geschrieben: Ich würde sagen da muss der HTTP-Befehl noch überarbeitet werden, wär auch praktisch wenn man mit dem direkt in einen Speicherbereich downloaden könnte...

Sowie Proxy Support ♥
Naja hoffen wir auf 4.40

DrFalo hat geschrieben:Meld, hier funzt das ganze mit dem Google-Link auch nicht, auch nicht per Api. Erhalte trotz Erfolgsmneldung nur ne abgeschnittene Datei ohne Suchergebnis.

Der Code den Google da liefert ist aber auch ne Krankheit,
wer sowas fabriziert sollte mal nen Webmasterseminar besuchen.

Bei anderen Links gehts nämlich absolut fehlerfrei.

Google > Youtube > http://www.purebasic.fr/german/viewtopic.php?t=19655

@ Google API
Ich hab gerade mal versucht was zusammen zu bauen,aber auch dort versagt PB mit dem Herunterladen.

Dagegen geht das ganze bei "Bing" wunderbar
Beispiel

Code: Alles auswählen

;http://api.search.live.net/xml.aspx?Appid=<Your App ID HERE!>&query=sushi&sources=web

InitNetwork()
Wort$ = InputRequester("Spiel", "Gib dein Wort ein", "")
If ReceiveHTTPFile("http://api.search.live.net/xml.aspx?Appid=3FCC90404BF356D785F1B7825406A5A95ED6516E&query=" + Wort$ + "&sources=web", "Wort.txt")
  ReadFile(0, "Wort.txt")
  While Eof(0) = 0
    String$ = ReadString(0)
    Start = FindString(String$, "<web:Total>", 0)
    If Start
      Anzahl$ = Mid(String$, Start + Len("<web:Total>"), FindString(String$, "</web:Total>", 0)-Start-Len("</web:Total>"))
    EndIf
  Wend
EndIf

If Anzahl$
  MessageRequester("Anzahl", "Für " + Wort$ + " gab es " + Anzahl$ +" Treffer")
Else
  MessageRequester("Nichts", "Für " + Wort$ + " gab es keine Treffer")
EndIf

Das Schlag den Raab Spiel lässt sich so wunderbar umsetzen.
P.s Zum Code : hatte keine Lust mich mit dem XML gedöns auseinander zu setzen

Verfasst: **26.06.2009 16:46**

hmm, nadann würd ich die funktion ma als nutzlos bezeichnen... gibts in der MAC API n Befehl zum Files downloaden, weis das zufällig jemand?

vielen Dank für eure Hilfe!!

Verfasst: **26.06.2009 16:58**

m0 hat geschrieben:hmm, nadann würd ich die funktion ma als nutzlos bezeichnen...

Weil sie eine nicht konforme HTML-Datei nicht verarbeiten kann?

Das halte ich für ein Gerücht, beschwere dich bei Google oder nutze die Konkurenz.

Verfasst: **26.06.2009 17:06**

Ich wüsste nicht was das HTTP protokoll mit ner validen HTML datei zu tun hat, http ist ja rein die übertragung, prüft ja nicht was letztendlich in der datei steht(außer crc oder ähnliches, was aber auch net von html abhängig is), außer ich hab da was grob falsch verstanden?

Verfasst: **26.06.2009 17:20**

probiers mal damit:
http://forums.purebasic.com/english/vie ... t=purehttp

Funzt in Memory.

Verfasst: **26.06.2009 17:39**

Sehr geil dank dir für den Link

Jetzt noch Proxy Support und ich bin wunschlos glücklich

Verfasst: **27.06.2009 20:05**

Perfekt das funkioniert erste sahne, vielleicht sollte man sich daran bei der http-lib orientieren vielen Dank!!!!!

Verfasst: **28.06.2009 22:53**

Sooo
Also jetzt hab ich ma was gebastelt, sollte aber unter windows noch getestet werden, unter osx läufts top.

http://www.purebasic.fr/german/viewtopi ... 517#249517

viel spaß
m0

PureBoard

mittels http google Suchergebnis runterladen und parsen