The thing is I read all ur code.. I changed this :

Code:
    Public Sub New()
    
        Me.Initialise(IPAddress.Any, 0)
    End Sub
To this :
Code:
   Public Sub New()
        Dim ExtIp As IPAddress = IPAddress.Parse("_external ip")

        Me.Initialise(ExtIp, 3000)
    End Sub
The server form still doesnt work on other pc . I changed down some others setting that was related to server IP/Port and the application just crashed. So If you dont mind, I would need your help. Thanks in advance.