http get Übertragunsfehler

Übersicht

BlitzBasic

Allgemein

	Rocys Betreff: http get Übertragunsfehler	Mi, Sep 10, 2014 14:06 Antworten mit Zitat
Hallo zusammen, ich versuche mit folgender Funktion HTML-Dateien zu laden: Code: [AUSKLAPPEN] [EINKLAPPEN] Function download_file(server$,path$,speicherort$) www = OpenTCPStream(server$,80) If www = False Then RuntimeError "Datei kann nicht geladen werden: "+server+" "+path WriteLine www,"GET http://" + server$ + path$ + " HTTP/1.0" + Chr$(13)+Chr$(10) + "Host: " + server$ + Chr$(13)+Chr$(10) + "User-Agent: blitzbasic" + Chr$(13)+Chr$(10) + "Accept: /" + Chr$(13)+Chr$(10) +"Cookie: PHPSESSID="+cookie$+Chr$(13)+Chr$(10) Local speicher_stream=WriteFile(speicherort) While Eof(www) = False ;WriteLine speicher_stream,ReadLine$(www) byte=ReadByte(www) If byte=10 And lastbyte><13 Then WriteByte speicher_stream,13 WriteByte speicher_stream,byte lastbyte=byte ;WriteByte speicher_stream,ReadByte(www) Wend CloseTCPStream(www) CloseFile speicher_stream End Function Das funktioniert auch sehr gut. Das Problem ist, dass etwa jede 50. Zeile nicht gelesen wird. Stattdessen werden vier (gefühlt) zufällige Zeichen gelesen. Anschließend wird der Rest der Datei dann wieder richtig gelesen. Hat jemand eine Idee, woran das liegen könnte und was man dagegen tun könnte?

Rocys

Betreff: http get Übertragunsfehler

Mi, Sep 10, 2014 14:06
Antworten mit Zitat

Hallo zusammen,
ich versuche mit folgender Funktion HTML-Dateien zu laden:
Code: [AUSKLAPPEN]

Function download_file(server$,path$,speicherort$)

www = OpenTCPStream(server$,80)
If www = False Then RuntimeError "Datei kann nicht geladen werden: "+server+" "+path
WriteLine www,"GET http://" + server$ + path$ + " HTTP/1.0" + Chr$(13)+Chr$(10) + "Host: " + server$ + Chr$(13)+Chr$(10) + "User-Agent: blitzbasic" + Chr$(13)+Chr$(10) + "Accept: */*" + Chr$(13)+Chr$(10) +"Cookie: PHPSESSID="+cookie$+Chr$(13)+Chr$(10)
Local speicher_stream=WriteFile(speicherort)
While Eof(www) = False
;WriteLine speicher_stream,ReadLine$(www)
byte=ReadByte(www)
If byte=10 And lastbyte><13 Then WriteByte speicher_stream,13
WriteByte speicher_stream,byte
lastbyte=byte
;WriteByte speicher_stream,ReadByte(www)
Wend
CloseTCPStream(www)
CloseFile speicher_stream

End Function

Das funktioniert auch sehr gut. Das Problem ist, dass etwa jede 50. Zeile nicht gelesen wird. Stattdessen werden vier (gefühlt) zufällige Zeichen gelesen. Anschließend wird der Rest der Datei dann wieder richtig gelesen.
Hat jemand eine Idee, woran das liegen könnte und was man dagegen tun könnte?

	Silver_Knee	Mi, Sep 10, 2014 20:13 Antworten mit Zitat
Direkt zu deinem Problem kann ich dir nicht helfen, schau dir aber mal das Programm Wireshark an. Damit kannst du die Verbindung mitlesen und überprüfen ob alles richtig übertragen wird. Außerdem glaube ich ist in der Zeile mit GET esnicht notwendig http://+server mit zu schicken. Normalerweise kommt nach GET der Pfad beginnend mit / . Die Zeile mit if byte=10 and lastbyte<> 13 funktioniert nur bei textdateien. Das sollte dir bewusst sein.sobald du was anderes, wie Bilder oder Word Dateien runterladen willst, macht dir die zeile Die Datei kaputt.

Silver_Knee

Mi, Sep 10, 2014 20:13
Antworten mit Zitat

Direkt zu deinem Problem kann ich dir nicht helfen, schau dir aber mal das Programm Wireshark an. Damit kannst du die Verbindung mitlesen und überprüfen ob alles richtig übertragen wird.

Außerdem glaube ich ist in der Zeile mit GET esnicht notwendig http://+server mit zu schicken. Normalerweise kommt nach GET der Pfad beginnend mit / .

Die Zeile mit if byte=10 and lastbyte<> 13 funktioniert nur bei textdateien. Das sollte dir bewusst sein.sobald du was anderes, wie Bilder oder Word Dateien runterladen willst, macht dir die zeile Die Datei kaputt.

	Hummelpups	Di, Nov 11, 2014 15:36 Antworten mit Zitat
dann kommt die Seite bestimmt in chunks bei dir an siehe http://en.wikipedia.org/wiki/C...r_encoding
blucode - webdesign - Ressource - NetzwerkSim BlitzBasic 2D - BlitzMax - MaxGUI - Monkey - BlitzPlus

Hummelpups

Di, Nov 11, 2014 15:36
Antworten mit Zitat

dann kommt die Seite bestimmt in chunks bei dir an

siehe http://en.wikipedia.org/wiki/C...r_encoding

blucode - webdesign - Ressource - NetzwerkSim
BlitzBasic 2D - BlitzMax - MaxGUI - Monkey - BlitzPlus