當前位置:開發者網絡 >> 技術教程 >> .NET教程 >> 面向對像編程 >> 內容
精彩推薦
分類最新教程
分類熱點教程
    
從網頁上讀取源代碼,並寫入文件
作者:未知
日期:2004-12-02
人氣:
投稿:snow(轉貼)
來源:未知
字體:
收藏:加入瀏覽器收藏
以下正文:
Private Sub DownloadData(ByVal URLString As String, ByVal LocalFile As String) 'LocalFile 是文件的一個完全路徑 (包括*.exe)
Try

'HttpWebRequest 類對 WebRequest 中定義的屬性和方法提供支持',也對使用戶能夠直接與使用 HTTP 的服務器交互的附加屬性和方法提供支持。
Dim httpReq As System.Net.HttpWebRequest

' HttpWebResponse 類用於生成發送 HTTP 請求和接收 HTTP 響'應的 HTTP 獨立客戶端應用程序。
Dim httpResp As System.Net.HttpWebResponse

Dim httpURL As New System.Uri(URLString)

httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)
httpReq.Method = "GET"
httpResp = CType(httpReq.GetResponse(), HttpWebResponse)

Dim reader As StreamReader = New StreamReader(httpResp.GetResponseStream) '如是中文,要設置編碼格式為「GB2312」。
Dim respHTML As String = reader.ReadToEnd() 'respHTML就是網頁源代碼
Dim Sw As StreamWriter = File.CreateText(LocalFile)

Sw.Write(respHTML)
Sw.Close()

httpResp.Close()

Catch e As Exception
Console.WriteLine("GetSource出現問題:{0},{1}", e.Message, URLString)
End Try
End Sub


相關文章: