ProxyServer anfragen mit TCP

  • Hey
    Ich möchte Daten, die mir der Browser schickt empfangen und dann auf einen Proxyserver weiterschicken. Das Skript bringt zwar nichts direkt, ich möchte aber nur erst mal daraus lernen ^^. Ich hab Firefox jetzt 127.0.0.1:80 als Proxy eingestellt. Der Proxyserver im Skript funktioniert, also daran liegst nicht.
    Hier mein Skript:

    Spoiler anzeigen
    [autoit]

    TCPStartup()
    $IP = "127.0.0.1"
    $MainSocket = TCPListen($IP, 80, 100)
    If $MainSocket = -1 Then Exit
    While 1
    Do
    $ConnectedSocket = TCPAccept($MainSocket)
    Until $ConnectedSocket >= 0
    $get = ""
    Do
    $get = TCPRecv($ConnectedSocket, 1024)
    Until $get <> ""
    ;MsgBox(0,0,$get)
    $socket = TCPConnect("14.63.240.81", "80")
    TCPSend($socket, $get)
    ;MsgBox(0,0,$get)
    $recv = ""
    Do
    $recv = BinaryToString(TCPRecv($socket, 1024))
    Until $recv <> ""
    MsgBox(0,0,$recv)
    TCPSend($ConnectedSocket, $recv)
    TCPCloseSocket($ConnectedSocket)
    TCPCloseSocket($socket)
    TCPShutdown()
    WEnd

    [/autoit]


    Vielen Dank für eure Hilfe
    MfG AntiSpeed

    Nur keine Hektik - das Leben ist stressig genug