Eine webseite mit PureBasic auslesen

[harryup]

Hallo,
ich versuche gerade, den Bitcoin wert aus einer Webseite auszulesen, aber irgendwie geht das nicht:

Code: Alles auswählen

Result = InitNetwork() ;okay, liefert 1

Verbindung = OpenNetworkConnection("https://www.blockchain.com/de/ticker",6000) ; liefert immer 0, warum?
		
MessageRequester("Titel","Result = "+Str(result)+Chr(13)+"Verbindung = " +Str(verbindung),0)

Vielen Dank an alle
Meine Ausrüstung ist ein WIN XP Notebook und PureBasic 4.61

[Kiffi]

Für solche Sachen ist kannst Du ReceiveHTTPMemory() verwenden.

Code: Alles auswählen

*Buffer = ReceiveHTTPMemory("https://www.blockchain.com/de/ticker")
If *Buffer
  Size = MemorySize(*Buffer)
  Debug "Content: " + PeekS(*Buffer, Size, #PB_UTF8|#PB_ByteLength)
  FreeMemory(*Buffer)
Else
  Debug "Failed"
EndIf

Dafür müsstest Du aber mal Deine 11 Jahre alte PB-Version aktualisieren.

[NicTheQuick]

Ich fürchte dir fehlt da grundlegendes Wissen über die Netzwerkkommunikation. Und du hast die Hilfe zu "OpenNetworkConnection()" nicht gelesen:

ServerName$
Der Server, zu dem verbunden werden soll. Dies kann eine IP-Adresse oder ein voller Name sein (d.h. "127.0.0.1" oder "ftp.home.net").

Du hast aber eine URL angegeben: https://www.blockchain.com/de/ticker
Und woher hast du die 6000?

Das ergibt alles keinen Sinn.

Was du brauchst wäre "ReceiveHTTPMemory()", aber ich bin nicht sicher, ob es das schon in Purebasic Version 4.61 gab.
Was mich zur nächsten Frage bringt: Wieso zur Hölle nutzt du WindowsXP? Erstens ist es nicht mehr zeitgemäß, zweitens unsicher, und drittens wirst du auf manche Webseiten wahrscheinlich gar nicht mehr drauf kommen, weil sie mittlerweile eine Verschlüsselung nutzen, die WindowsXP nicht mehr unterstützt. Irgendwann laufen auch deine Root-Zertifikate ab und dann geht noch weniger.

[harryup]

Danke, das ergibt Sinn. ich nutze die alte Entwicklungsumgebung, bis sie nicht mehr läuft. Okay, die Version kann das noch nicht, muss mal aktualisieren...

[harryup]

So, die Version ist aktualisiert, vielen Dank, Kiffi

[jacdelad]

[...] ich nutze die alte Entwicklungsumgebung, bis sie nicht mehr läuft. [...]

Das ist für Handys und Autos lobenswert, aber bei Software nicht wirklich empfehlenswert. Zumal alle Folgeupdates kostenlos sind.