Bind and Listen on an Available Port in a Range

See more Socket/SSL/TLS Examples

Demonstrates Socket.BindAndListenPortRange, which searches an inclusive port range for an available TCP port, binds it, and begins listening. It returns the selected port, or -1 on failure.

$oSocket = ObjCreate("Chilkat.Socket")

;  Search the inclusive port range for an available TCP port, bind it, and begin listening.  The
;  method returns the selected port, or -1 when no port can be bound.
Local $iBoundPort = $oSocket.BindAndListenPortRange(5000,5100,25)
If ($iBoundPort < 0) Then
    ConsoleWrite($oSocket.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Listening on port " & $iBoundPort & @CRLF)