首頁 > VB.NET > 讀取URL文字檔

讀取URL文字檔

2009年4月2日 DoReMiCat 發表評論 閱讀評論

這次來寫一下VB.NET版的讀取URL文字檔的範例，
我們可能會用這個方法來取得對方網站提供的資訊，
例如，中央氣象局的TXT檔…自行運用囉…

CODE如下


Imports System.Net
Imports System.IO

Partial Class VBtest
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim strURL As String = "http://XXXX.XXXX.com.tw/xxx.txt"

        Dim oRequest As HttpWebRequest = WebRequest.Create(strURL)

        Dim oResponse As HttpWebResponse = DirectCast(oRequest.GetResponse(), HttpWebResponse)

        Dim sr As StreamReader = New StreamReader(oResponse.GetResponseStream())

        Do While sr.Peek > -1
            Dim t As String = sr.ReadLine
            MsgBox(t)
        Loop

        oResponse.Close()

    End Sub
End Class

如果遇到讀出的是亂碼的話,請將..

Dim sr As StreamReader = New StreamReader(oResponse.GetResponseStream())

改成

Dim sr As StreamReader = New StreamReader(oResponse.GetResponseStream(),System.Text.Encoding.Default)

System.Text.Encoding.Default 會取得系統目前ANSI 字碼頁的編碼方式

相關文章:

Categories: VB.NET Tags: 854
  1. 本篇文章目前尚無任何評論。
  1. 本篇文章目前尚無任何 trackbacks 和 pingbacks。