How to make script communicate through tcp in lan

[Piyush]

Hi! every one....

I wanted to make script which can communicate through lan..but i don't know how to use TCP functions. I knw nothing about tcp.Is there anyone who can explain it to me....with an example or somethng else...PLZ...

Thx..

[exodius]

See that little box in the upper-right with a "Search" button next to it? Type "+TCP +Chat" (without the quotes) in it and hit enter.

Edited April 13, 2010 by exodius

[Piyush]

Thx For that..it is a bit difficult but i thnk i can handle it....

[Piyush]

hey i followed your advice and learnt it a little bit ..but i am facing a problem..

the things i have learnt are

there is a server and a client..

we can create a server on our ip address and a specific port.. with TCPlisten function..

then run a while loop to accept and receive data..through TCPAccept and TCPReceive

the next script is a client script...where it connects to the server with TCPConnect and sends and receive data o server with TCPReceive and TCPSend.

the client can send and receive data and i know that server can receive data but how can server send data to a client whom it has received data...

i tried this...

server side

TCPStartup();~ create a roooooom
$room=TCPListen("192.168.20.224",6561)
if @error Then  MsgBox(0,'','Error')Else    MsgBox(0,'','done')
EndIf
While 1
$dooropen=TCPAccept($room)
$recivedata=TCPRecv($dooropen,100000000)
if $recivedata ThenMsgBox(0,'',$recivedata)
TCPSend($dooropen,"Thanks")
EndIf
WEnd
TCPShutdown()

and client side

TCPStartup()
$room=TCPConnect("192.168.20.224",6561)
if @error ThenMsgBox(0,'','Not Connected')
Exit
EndIf
$send=TCPSend($room,"pagal pan")
While 1
    $data=TCPRecv($room,100000)
    if $data Then       
MsgBox(0,'messagereceived in client',$data)  
  EndIf
WEnd
TCPShutdown()

but this is not working.... PLZ HElp me out..

Edited April 13, 2010 by Piyush