Moin,
ich würde gerne eine Art "kindersicherung" machen, die einen bestimmten port sagen wir mal Port: 80 überwacht.
Die Kindersicherung wird bei systemstart automatisch gestartet und stellt dann ein TCPListen her.
Spoiler anzeigen
$GOOEY = GUICreate("Mein Server", 627, 447, 192, 124)
$edit = GUICtrlCreateEdit("", 0, 0, 625, 273)
GUICtrlSetData(-1, "")
GUISetState()
;=========================================================
; Verbindung aufbauen und Packete abfangen
;=========================================================
$Start = TCPStartup()
$IP = "127.0.0.1"
$Port = 80
$Connection = TCPListen($IP, $Port)
$Accept = -1
Do
$Accept = TCPAccept($Connection)
Until $Accept <> -1
MsgBox(0, "Verbindung aufgebaut", "Die Verbinung wurde erfolgreich aufgebaut.")
[/autoit] [autoit][/autoit] [autoit]While 1
$GetData = TCPRecv($Accept, 2048)
If $GetData <> "" Then
GUICtrlSetData($edit, _
@HOUR & ":" & @MIN & ":" & @SEC & $GetData & @CRLF & GUICtrlRead($edit))
EndIf
WEnd
Wenn jetzt z.B. der Browser gestartet wird und der Script ein Paket mit dem Inhalt "Host: https://autoit.de/www.google.de" empfängt soll er das Paket NICHT senden bzw. blockieren und evtl ein anderes zurückschicken bzw wo anders umleiten. Das Problem ist bei meinem au3 script kommt nix an ![]()
Würde mich über Hilfe freuen gruß
i3illig