simplest network - how to?

[qwertylol]

I am on 10.0.1.101 ( my own router network )

and I want to send a line of text to 10.0.1.103

how do I do it?

[Fossil Rock]

Search for client/server in the forums, there are some good examples.

[rasim]

I am on 10.0.1.101 ( my own router network )

and I want to send a line of text to 10.0.1.103

how do I do it?

Example:

expandcollapse popup

;Server!!! Start me first
#include <GUIConstants.au3>

Global $szIPAddress = "127.0.0.1"
Global $TcpPort = 33891

TCPStartup()

$MainSocket = TCPListen($szIPAddress, $TcpPort)
If @error Then Exit
    
;Create a GUI for incoming messages
GUICreate("Chat", 300, 200)
$edit = GUICtrlCreateEdit("", 10, 10, 200, 150)
GUISetState()

Global $Connect = -1

Do
    $Connect = TCPAccept($MainSocket)
    If GUIGetMsg() = -3 Then ExitLoop
Until $Connect <> -1

While 1
    If GUIGetMsg() = -3 Then ExitLoop
        $recv = TCPRecv($Connect, 2048)
        If @error Then ExitLoop
            If $recv <> "" Then GUICtrlSetData($edit, $recv)
                Sleep(30)
            WEndoÝ÷ Ù«­¢+Øí
±¥¹ÐÌÌìÌÌìÌÌìMÑÉÐÑ¡¥ÌÍÉ¥ÁÐÑÈÍÑÉÑ¥¹ÍÉÙÈ()Q
AMÑÉÑÕÀ ¤()±½°ÀÌØíÍé%AÉÍÌôÅÕ½ÐìÄÈܸÀ¸À¸ÄÅÕ½Ðì)±½°ÀÌØíQÁA½ÉÐôÌÌàäÄ)±½°ÀÌØíÍéÑ((ÀÌØí
½¹¹ÐôQ
A
½¹¹Ð ÀÌØíÍé%AÉÍÌ°ÀÌØíQÁA½ÉФ)%ÉɽÈQ¡¸(%5Í ½à ÄØ°ÅÕ½ÐíÉɽÈÅÕ½Ðì°ÅÕ½Ðí9½Ð½¹¹ÐѼÍÉÙÈÅÕ½Ðì¤(%á¥Ð)¹%($)]¡¥±Ä($ÀÌØíÍéÑô%¹ÁÕÑ ½à ÅÕ½ÐíM¹ÑѼÍÉÙÈÅÕ½Ðì°ÅÕ½Ðí¹ÑÈÑѼÑɹ͵¥ÐѼѡÍÉÙÈÅÕ½Ðì°ÅÕ½Ðí!±±¼É¥¹ÌÌìÅÕ½Ðì¤(%%ÉɽÈQ¡¸á¥Ñ1½½À($%Q
AM¹ ÀÌØí
½¹¹Ð°ÀÌØíÍéѤ($%%ÉɽÈQ¡¸á¥Ñ1½½À($$%M±À ÌÀ¤($%]¹