Wenn du ein Element aus dem Array löscht verringert sich die Anzahl der Elemente im Array.
Bei der For Schleife wird "UBound($Array) - 1" nur einmal ausgeführt.
Probier es mal mit einer Do Schleife.
[autoit]$iI2 = 0
Do
;if(!($aItems[$iI2][1] == GUICtrlRead($comboAction))) Then
;_ArrayDelete($aItems, $iI2)
;EndIf
$iI2 += 1
Until $iI2 = UBound($aItems)
;_GUICtrlListView_AddArray($iListview, $aItems)
;_GUICtrlListView_Scroll($iListview, 0, $vFileSize*20)
Sieh dir einfach mal die Online Hilfe zu FileFindFirstFile an.
Am besten auch noch dazu die Online Hilfe zu FileFindNextFile.
Dort solltest du selbst eine Lösung finden.
Ein fertiges Beispiel findest du bei beiden Links.
Ich denke mal dein Fehler liegt in der Schleife.
Du löscht nur die GUI aber beendest nie die Schleife. (ExitLoop)
Wieso "Akzeptierst" du neue Verbindungen wenn sich ein Client schon mit den Server verbunden hat?
Ich denke mal da liegt das Problem.
Erstell die Variable $acceptsocket einfach vor der While Schleife mit den Wert -1
Dann fragst du im Script ab ob diese den Wert -1 hat. Wenn ja verwendest du TCPAccept().
Wenn du dadurch jetzt eine Verbindung ermöglicht hast ist $acceptsocket nicht mehr -1.
Dann machst du einfach eine 'If $acceptsocket <> -1 Then' abfrage.
Da drunter dann halt dein Code in den du die Pakete annimmst und diese auch weiterverarbeitest (TCPRecv, If * = * then, CDTray("E:", "open"), ...)
In den Spoiler findest du deinen Server wie er funktionieren sollte.
(Wenn du meinen Text nicht entschlüsseln kannst. ^^)
HotKeySet("{ESC}", "_Exit")
Func _Exit()
TCPCloseSocket( $acceptsocket)
TCPShutdown()
Exit
EndFunc
TCPStartup()
;Global $ip = @IPAddress1
Global $ip = "127.0.0.1"
MsgBox(0, "IP", $ip)
$mainsocket = TCPListen( $ip, 4321)
;-- Ab hier wurde was verändert! 
$acceptsocket = -1
While 1
If $acceptsocket = -1 Then
$acceptsocket = TCPAccept( $mainsocket)
ElseIf $acceptsocket <> -1 Then
$resivedData = TCPRecv( $acceptsocket, 2048, 1)
$resivedData = BinaryToString($resivedData)
If $resivedData = "CDTray" Then
CDTray("E:", "open")
MsgBox(64, "", "CD TRAY!", 1500)
ElseIf $resivedData <> "" Then
MsgBox(16, "Nachricht von Client", $resivedData)
EndIf
EndIf
WEnd
;-- Bis hier!
Ich denke mal die AutoItCompiler Alternative ist folgende:
Du kopierst die AutoIt3.exe aus deinen AutoIt Verzeichnis in den selben Ordner in den dein 'Hauptscript' ist.
Um dann ein Script auszuführen verwendest du das:
$sFile = @ScriptDir & "\test.au3"
Run('"' & @ScriptDir & '\AutoIt3.exe" /AutoIt3ExecuteScript "' & $sFile & '"')
Natürlich kannst du auch den Ordner Include gleich mit kopieren... 
