Dim Url As String = "http://server.com/"
        Dim Client As Net.WebClient = New Net.WebClient()
        Dim UserName As String = "username"
        Dim Password As String = "password"
        Dim Data() As Byte = Nothing
        Client.Credentials =  New Net.NetworkCredential(UserName, Password)
        Try
            Data = Client.DownloadData(Url)
            Console.WriteLine(System.Text.Encoding.Default.GetString(Data))
        Catch ex As Exception
            Console.WriteLine(ex.ToString())
        End Try
        Console.ReadLine()