Ermöglicht/Lässt einen eingehenden Verbindungsversuch auf einem "Socket" zu.
TCPAccept ( mainsocket )
Parameter
| mainsocket | Die Kennung des Haupt-Sockets (SocketID), wie von TCPListen zurückgegeben. |
Rückgabewert
| Erfolg: | Gibt verbundene "Socket"-Kennung zurück. |
| Fehler: | Gibt -1 zurück und setzt @error |
| @error: | Windows API WSAGetError Rückgabewerte (siehe MSDN). |
Bemerkungen
Verwandte Funktionen
TCPStartup, TCPListen, TCPTimeout (Option), TCPCloseSocket, TCPRecv
Beispiel
; SERVER!! Vor dem Client starten!!!!!!!!!!!
$IP = "127.0.0.1" ; IP
; Startet den TCP Service
;==============================================
TCPStartUp()
; Erstellt einen lauschenden "SOCKET"
;==============================================
$MainSocket = TCPListen($IP, 65432, 100 )
If $MainSocket = -1 Then Exit
; Warten auf eine Client-Verbindung
;--------------------
While 1
$ConnectedSocket = TCPAccept( $MainSocket)
If $ConnectedSocket >= 0 Then
msgbox(0,"","Mein Server - Client verbunden")
exit
EndIf
Wend