Dim hServerSocket As ServerSocket

hServerSocket = New ServerSocket ( [ Path As String, MaxConn As Integer ] ) [ As "event name" ]

Creates a new server socket.