Imports System.Net
Imports System.IO


Partial Class _Default
    Inherits System.Web.UI.Page

    Dim u As String
    Dim webC As WebClient
    Dim stream As Stream
    Dim streamRdr As StreamReader


    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        u = txtURL.Text
        If u = "" Then
            u = "http://www.google.com"
        End If

        webC = New WebClient()
        webC.Credentials = System.Net.CredentialCache.DefaultCredentials
        stream = webC.OpenRead(u)
        streamRdr = New StreamReader(stream)
        myPage.Text = streamRdr.ReadToEnd()
        stream.Close()
    End Sub

End Class