TCPStartup()

$hServer = TCPConnect(@IPAddress1, 1337)
If $hServer = -1 Then
	MsgBox(16, "Error", "Socket Error: " & $hServer)
	Exit
EndIf

TCPSend($hServer, "Hier werden Daten über das Netzwerk geschickt. Es wird solange beim Client gelistened bis ich einen bestimmten String schicke.EOS")

TCPCloseSocket($hServer)
TCPShutdown()