Imports System.Net

Public Module Module1

Public Function httpdown(Optional ByVal 주소 As String = "http://blog.daum.net/pootbar/")

        Dim wReq As WebRequest = WebRequest.Create(주소)

        Dim wResp As WebResponse = wReq.GetResponse

        Dim RespStream As System.IO.Stream = wResp.GetResponseStream

        Dim Reader As System.IO.StreamReader = New System.IO.StreamReader(RespStream, System.Text.Encoding.UTF8)

        Dim RespHTML As String = Reader.ReadToEnd

        Return RespHTML

    End Function

End Module