I have tried the code above but get the Warning "Variable 'myLan' was not initialized. (warning #11)."
When I try to initialize with "myLan.Initialize(0,"")", I get the error "_newconnection: event not found"
I have also tried to step through alternative ports by using:
Dim MyPort As Int = 0
Dim Sw As Boolean = False
Do While Sw = False
Try
myLan.Initialize(MyPort, "")
Sw = True
Catch
MyPort = MyPort + 1
End Try
Loop
but I still get the same error message.
How can I initialize the ServerSocket to avoid the warning?