warum keine NetWorkConnection ?

[Justin]

Hallo zusammen,

habe gerade folgendes ausprobiert:

Code: Alles auswählen

If InitNetwork() = 0
  MessageRequester("Fehler","Netzwerk konte nicht initialisiert werden")
EndIf

NetID = OpenNetworkConnection("http://www.google.de", 80)
If NetID
  
Else
  MessageRequester("Fehler","Verbindung konnte nicht hergestellt werden " )
  End
EndIf

Leider wird die Verbindung nicht hergestellt - warum?

Gruß
Justin

Windows Vista Ultimate x64
PB 4.40 B2 x64

[STARGÅTE]

Bei mir läufts, bekomme kein fehler, aber das http:// kannst du auch weglassen.!

Liegt also vermutlich an deinem PC/ deiner Internetverbindung

[Justin]

is ja n Ding, wenn ich "http://" weg lasse geht es... SEHR fraglich!

Hast du die gleiche PB Version wie ich?

[ts-soft]

Bei mir läufts, bekomme kein fehler, aber das http:// kannst du auch weglassen.!

Liegt also vermutlich an deinem PC/ deiner Internetverbindung

das http:// muß sogar weggelassen werden, zumindest mit PB4.40 b2

[Justin]

wie ist das zu verstehen - "zumindest bei PB 4.4" ?

[ts-soft]

wie ist das zu verstehen - "zumindest bei PB 4.4" ?

Hab nichts anderes zum Testen installiert, da es bei STARGÅTE anscheinend
auch mit http:// geht nehme ich mal an, es betrifft nicht alle Versionen von PB.

[TomS]

Wenn ältere Versionen das unterstützen, ist es ein unnötiges Feature.
http:// gibt ein Protokoll an und hat nichts in einer Server-Adresse zu suchen.

[Justin]

@TomS
ja ok, hört sich logisch an .

Ich werde euch mal weiter langweilen :
Nachdem das also jetzt funktioniert wollte ich weiter experimentieren und bin darauf gekommen, mal eine Datei von Rapidshare zu laden, ohne ReceiveHTTPFile() zu verwenden - ich will nicht umständlich die Daten speichern und dann wieder laden müssen, ist zwar für einen Dateidownload in dieser Art nicht besonders sinnvoll, aber einfach mal so als Übung. Ich speichere die Daten auch nur, um sie geschwint im Browser anzeigen zu lassen.

Ich habe mir also folgenden Code geschrieben:

Code: Alles auswählen

If InitNetwork() = 0
  MessageRequester("Fehler","Das Netzwerk konnte nicht initialisiert werden")
  End
EndIf

NetID = OpenNetworkConnection("rapidshare.com", 80) 
If NetID = 0  
  MessageRequester("Fehler","Verbindung konnte nicht hergestellt werden")
  End
EndIf

Header.s = "GET /files/275488183/MP_VP.rar HTTP/1.1" + #CRLF$
Header   + "Host: rapidshare.com" + #CRLF$
Header   + #CRLF$

SendNetworkString(NetID, Header)
Repeat: Until NetworkClientEvent(NetID) = #PB_NetworkEvent_Data

*buffer = AllocateMemory(83290)
ReceiveNetworkData(NetId, *buffer, MemorySize(*buffer))

If CreateFile(0, "c:\a.html")
  WriteData(0, *buffer, MemorySize(*buffer))
  CloseFile(0)
Else
  MessageRequester("Fehler","Datei konnte nicht geschrieben werden")
EndIf

Leider kommen da nicht alle Daten bei rüber - der Header sollte aber stimmen ?

Mal zum Vergleich sollte folgendes übertragen werden (die Site zur auswahl ob man Free- oder Premiumuser ist):
http://rapidshare.com/files/275488183/MP_VP.rar

Wo kommt das her, denn der Buffer ist jetzt mal frei Schnauze extra groß erstellt ?

[AND51]

is ja n Ding, wenn ich "http://" weg lasse geht es... SEHR fraglich!

Nö, nicht fraglich.

Liegt einfach daran, dass http:// kein Bestandteil der Domain bzw. des Servernamen ist. Und wenn du die Beschreibung zu dem Befehl ansiehst, stellst du fest, dass dieser Befehl nur den Servernamen erwartet.

[HeX0R]

Wo kommt das her, denn der Buffer ist jetzt mal frei Schnauze extra groß erstellt ?

TCP/IP versendet immer Häppchenweise, wobei du nie sicher sein kannst, wie groß denn nun das nächste Häppchen ist.
Also in einem Aufwasch bekommst du evtl. sehr kleine Dateien runter (aber das ist auch nie sicher), aber keine größeren.

Tja, sooo einfach ist die ganze Netzwerkgeschichte nun wirklich nicht...