Winsock1.Close 'Man kann ja nie wissen…
Winsock1.RemotePort = Port 'Proxy Port
Winsock1.RemoteHost = ip 'Proxy Adresse
Winsock1.Connect
Do While Winsock1.State = 6: DoEvents: Loop
If Winsock1.State 7 Then Exit Sub
Winsock1.SendData „GET " & „http://4n1m4.de.vu“ & " HTTP/1.0“ & vbCrLf 'Unseren request senden
Winsock1.SendData „Accept: */*“ & vbCrLf 'Alle mime-Typen akzeptieren
Winsock1.SendData „Proxy-Connection: Keep-Alive“ & vbCrLf
'Allen Proxys mitteilen, das sie die verbindung aufrecht erhalten sollen
Winsock1.SendData „User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)“ & vbCrLf
'Mitteilen, das wir den IE6 nutzen
Winsock1.SendData "Host: " & ip & vbCrLf 'Jetzt muß der Proxy noch wissen wohin er die anfrage weiterleiten soll. Würden wir eine direkte verbindung zum host aufbauen, müßten könnten wir das weglassen.
Winsock1.SendData vbCrLf
ich weiß nicht warum aber mein link wird leider nicht geklickt.
Mein problem ist das ich nich weiß warum.
Ich hoffe ihr könnt mir dabei helfen
danke im vorraus. Kevin