vb.net webrequest html source

1. 모듈

 

Imports System.Net

Public Module Module1

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

        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

 

 

 

2.사용

 

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Module1.httpdown(http://daum.net/) 

End Sub

 

 

 

 

 

출처 : http://www.vnote.kr (작성자:V닉맨) 감사해요