Imports System.IO
Imports System.Net
Imports System.Text
public class MainClass
Shared Sub Main()
Dim address As New Uri("http://yourdomain.com/temp/example.htm")
Console.WriteLine(address.Host)
Console.WriteLine(address.DnsSafeHost)
End Sub
End Class