VBで指定したWEBサイトのHTMLソースを取得する

VBでWEBサイトのソースを取得するには、System.Net.WebClientを使って簡単にできます。

最初にSystem.Net.WebClient オブジェクトを作成して、System.IO.Stream を通してアクセスします。
エンコードの指定を忘れると、文字化けしますのでお気をつけて!!

 
   Public Sub get_html_text()

        Dim client As System.Net.WebClient = New System.Net.WebClient()

        Dim url As String
        url = "http://yahoo.co.jp"

        '指定したURLからhtmlのソースを取得する
        Dim myStream As System.IO.Stream = client.OpenRead(url)

        'エンコードを指定する 
        Dim sr As System.IO.StreamReader = New System.IO.StreamReader(myStream, System.Text.Encoding.GetEncoding("UTF-8"))

        Dim html_text As String = sr.ReadToEnd()

        sr.Close()

        myStream.Close()

        Debug.WriteLine(html_text)

    End Sub




カテゴリー: VB パーマリンク