Move a Connection into Another Socket

See more Socket/SSL/TLS Examples

Demonstrates Socket.TakeConnection, which moves the active connection from one Socket into another. The receiving object first releases any connection it previously held.

Dim success As Boolean = False

Dim listenSock As New Chilkat.Socket

success = listenSock.BindAndListen(5000,25)
If (success = False) Then
    Debug.WriteLine(listenSock.LastErrorText)
    Exit Sub
End If


Dim connectedSock As New Chilkat.Socket
success = listenSock.AcceptNext(20000,connectedSock)
If (success = False) Then
    Debug.WriteLine(listenSock.LastErrorText)
    Exit Sub
End If


'  Move the active connection out of connectedSock and into another Socket object.  Unlike
'  TakeSocket, this does not add a member to a socket set.  After success, connectedSock holds no
'  connection.
Dim handlerSock As New Chilkat.Socket
success = handlerSock.TakeConnection(connectedSock)
If (success = False) Then
    Debug.WriteLine(handlerSock.LastErrorText)
    Exit Sub
End If

Debug.WriteLine("Connection moved to the handler socket.")