Hi, try this:
Code:
Dim hostNameOrAddress As String = YourIPadress
Dim returnValue As IPHostEntry
Try
returnValue = Dns.GetHostEntry(hostNameOrAddress)
MessageBox.Show(returnValue.HostName())
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
__________________
best regards _ powerade_
Last edited by _powerade_; 03-04-2009 at 7:07 AM.
|