Getting Remote Address from TCPClient

[Mark]

Ok,

Why is this so hard too do? I have a TCPListener that's working exactly
as expected. It fires off a new thread to listen on calling this function.

================================================== ======================
Private Sub DoListen()
m_oListener.Start()

While True
Dim oClient As TcpClient = m_oListener.AcceptTcpClient

' We got a new connection - get a server for it
Dim oServer As IServer = m_oFactory.GetServer

' *** Want to log the remote IP address and port here ***

oServer.ConnectTo(oClient)

' Add this server to our list to keep it alive
_Servers.Add(oServer)
End While

End Sub
================================================== ======================

Now I need to log the remote IP and port details, but socket is
protected in TCPClient and I can't get to it. I've created my own client
class derived from it, but you can't cast NetworkStream to a derived class.

Any clues or pointers here would be most appreciated!

TIA