TCP and While loop problem

[Alexxander]

hi

i had made 2 scripts server and clinet

part of server code

While 1
$accept = TCPAccept($socket)
$recive = TCPRecv($accept, 1000000)
If $recive = "hi" Then
_ArrayAdd($Array,$recive)
GUICtrlSetData($list, _ArrayToString($Array))
EndIf
WEnd

when im sending a tcp from the clint the data is viewd more than once in the list

for example when i send "hi" from the clinet it must make one item in the gui named list "hi"  but im gettign about 4 "hi" in the list

is thier is any way to only view one "hi" and never view it more than once ?

client

TCPStartup()

$socket = TCPConnect("192.168.1.111", 90)
TCPSend($socket, "hi")

Edited March 28, 2014 by Alexxander

[TechCoder]

one 'super simple' way.....

Local $gotit = 0
While 1
$accept = TCPAccept($socket)
$recive = TCPRecv($accept, 1000000)
If Not $gotit And $recive = "hi" Then
$gotit = 1
_ArrayAdd($Array,$recive)
GUICtrlSetData($list, _ArrayToString($Array))
EndIf
WEnd

[TechCoder]

and, of course, there is a function for that......

http://www.autoitscript.com/autoit3/docs/libfunctions/_ArrayUnique.htm