Seite 1 von 2
Webseiten auslesen
Verfasst: 22.09.2007 17:44
von Tompazi
Kann man mit PureBasic texte aus webseiten auslesen?
Wenn ja wie?
lG Tompazi
Verfasst: 22.09.2007 17:59
von Scarabol
[alt]Mit PB nicht direkt aber du kannst API Befehle nutzen...
URLDownloadtoFile() z.B.[/alt]
[Edit]
Man kann auch mit der Netzwerk Bibliothek arbeiten.
[/Edit]
Code: Alles auswählen
If URLDownloadToFile_(0,"http://www.purebasic.fr/german/","C:\test.html",0,0) = #S_OK
If ReadFile(1, "c:\test.html")
While Eof(1) = 0
Code$+ReadString(1)+Chr(10)
Wend
Code$ = Right(Code$, Len(Code$)-FindString(Code$, "<body", 0)+1)
Code$ = Left(Code$, FindString(Code$, "</body", 0))
MessageRequester("Info", Code$)
EndIf
Else
MessageRequester("Error","Couldn't download file...",0)
EndIf
Gruß
Scarabol
Verfasst: 22.09.2007 18:05
von Tompazi
das geht nicht in der DEMO version oder?
Verfasst: 22.09.2007 18:06
von milan1612
Nein (jedenfalls nicht direkt), da eine API Funktion verwendet wird.
Verfasst: 22.09.2007 18:07
von Scarabol
Ne sorry leider net.
Dann bleibt dir nur noch mit opennetworkconnection einen HTTP request zu schicken und die Antwort auszulesen...
Gruß
Scarabol
Verfasst: 22.09.2007 18:11
von Tompazi
häää?
Verfasst: 22.09.2007 18:17
von Scarabol
Code: Alles auswählen
server$ = "www.google.de"
url$ = ""
filenaam$ = "index.html"
ConnectionID = OpenNetworkConnection(server$, 80)
;
If ConnectionID
SendNetworkString(ConnectionID, "GET "+url$+filenaam$+" HTTP/1.0"+EOL$)
SendNetworkString(ConnectionID, "Host: "+server$+EOL$)
SendNetworkString(ConnectionID, "Accept: */*"+EOL$)
SendNetworkString(ConnectionID, EOL$)
; Delay auf Antwort warten... <- musste sleber machen (siehe PB Hilfe)
result=ReceiveNetworkData(ConnectionID, Buffer, #bufferlengte)
endif
Verfasst: 26.09.2007 08:49
von 7x7
Du kannst auch einfach PureBasic KAUFEN, wenn du dir es einfacher machen möchtest
Verfasst: 29.09.2007 17:09
von mx03
Hi wie kann ich eine mit ssl gesicherte seite mit login auslesen?
thx
Verfasst: 29.09.2007 18:15
von Scarabol
Hast du die oben genannten Methoden schon versucht?
Gruß
Scarabol