Proxy Server bei Tcp Verbindung verwenden?

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

Jean

Betreff: Proxy Server bei Tcp Verbindung verwenden?

BeitragSo, Jun 18, 2006 17:15
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo

Ich möchte über B+ eine Internetseite über einen Proxy Server aufrufen, ohne die GUI Funktion des Internet Explorers zu verwenden. Weiss jemand wie ich sowas machen muss?

Vielen Dank
Jan

SoNenTyp

BeitragSo, Jun 18, 2006 17:50
Antworten mit Zitat
Benutzer-Profile anzeigen
Wenn es hier um HTTP geht dann einfach nur eine Verbindung zum Proxy aufbauen und im Header (Host war es glaube ich) die adresse des Ziel-Servers angeben. Informier dich am besten mal über das HTTP-Protokoll.
Gruss Der Typ.

User posted image

Jean

BeitragSo, Jun 18, 2006 18:11
Antworten mit Zitat
Benutzer-Profile anzeigen
Könntest du mir mal ein kleines Code Beispiel geben?

Willi die Rübe

BeitragSo, Jun 18, 2006 19:04
Antworten mit Zitat
Benutzer-Profile anzeigen
Code: [AUSKLAPPEN]

stream=opentcpstream(proxyadresse, proxyport)

Writeline stream, "GET: http://www.blitzforum.de HTTP/1.1"
Writeline stream, "Host: blitzforum.de"
WriteLine stream, ""

Bei Host bin ich mir nicht sicher, ob die Proxy- oder Serveradresse angegeben werden muss, hier musst du mal ein bisschen rumprobieren.
Ich habe keine Lösung, aber ich bewundere das Problem.
Tehadon
Q6600, MSI Neo2-FR, 4GB Ram, nVidia 7800 GTX

At the Farewell Party visit: MySpace | Homepage

Jean

BeitragSo, Jun 18, 2006 20:22
Antworten mit Zitat
Benutzer-Profile anzeigen
Guter Anfang, jedoch hat es noch einen Fehler... Ich bekomme immer einen Bad Request. Versteht das jemand?

Code: [AUSKLAPPEN]
stream=OpenTCPStream("proxy.unizh.ch", 3128)


WriteLine stream, "GET: http://www.blitzforum.de HTTP/1.1"
WriteLine stream, "Host: blitzforum.de"
WriteLine stream, ""

Repeat
send$ = ReadLine$ (stream)
Print send$
Until send$ = ""
WaitKey

Willi die Rübe

BeitragSo, Jun 18, 2006 20:37
Antworten mit Zitat
Benutzer-Profile anzeigen
Hoppla, mein Fehler, der Doppelpunkt nach Get muss weg Smile

Code: [AUSKLAPPEN]
stream=OpenTCPStream("proxy.unizh.ch", 3128)


WriteLine stream, "GET http://www.blitzforum.de HTTP/1.1"
WriteLine stream, "Host: blitzforum.de"
WriteLine stream, ""

Repeat
send$ = ReadLine$ (stream)
Print send$
Until send$ = ""
WaitKey


Wenn du dich jetzt wunderst warum du nicht die eigentlich Daten kriegst, musst du das Until send$="" rausnehmen, da sich zwischen den eigentlichen Daten und den Header Informationen auch so ein lustiges Leerzeichen befindet. Mach es am besten mit Eof:
Code: [AUSKLAPPEN]

;[...]

While Eof(stream)=0
 send$ = ReadLine$ (stream)
 Print send$
Wend
WaitKey()
Ich habe keine Lösung, aber ich bewundere das Problem.
Tehadon
Q6600, MSI Neo2-FR, 4GB Ram, nVidia 7800 GTX

At the Farewell Party visit: MySpace | Homepage

Jean

BeitragSo, Jun 18, 2006 21:21
Antworten mit Zitat
Benutzer-Profile anzeigen
Vielen Dank

Jedoch habe ich gerade bemerkt, dass diese Methode nur etwa mit 1% aller Proxyservern funktioniert. Gibt es hier keine standart Methode?

Danke

SoNenTyp

BeitragSo, Jun 18, 2006 21:34
Antworten mit Zitat
Benutzer-Profile anzeigen
Das ist der Standart. http://de.wikipedia.org/wiki/Http

Du kannst dir ja mal Proxomitron herunterladen (kostenlos). Und dir im Log Fenster ansehen was so versendet wird.

OT:
Bist du dir sicher das du 100 Proxys in der Zeit getestet hast?
Gruss Der Typ.

User posted image

Willi die Rübe

BeitragSo, Jun 18, 2006 22:09
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich bin mir zwar nicht sicher, aber nach meinen Http Protokoll Kenntnissen dürfte es nach der Headerzeile mit "Proxy Authentication Required" mit dem Senden von "USER username" und "PASS password" gegessen sein. Aber schlage am besten nochmal unter SoNenTyps Link bei HTTP-Authentifizierung nach.
Ich habe keine Lösung, aber ich bewundere das Problem.
Tehadon
Q6600, MSI Neo2-FR, 4GB Ram, nVidia 7800 GTX

At the Farewell Party visit: MySpace | Homepage

Jan_

Ehemaliger Admin

BeitragMo, Jun 19, 2006 8:42
Antworten mit Zitat
Benutzer-Profile anzeigen
https://www.blitzforum.de/foru...mp;start=0

die suche hilft.
between angels and insects

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group