笔记6:WebClient 类 一个更简捷的类




WebClient类设计用于存取时指定URI的资源,并且定义上传及下载数据所需的方法
WebClient类比WebRequest及 WebResponse这两个类以更简便的方式达到相同的效果

一、使用WebClient类
WebClient是一个无法被继承的类,提供两种比较重要的方法
DownloadData( ) 从指定的URI下载数据
DownloadFile( )从指定的URI下载文件

DownloadData( ) 参数可是地址字串,或URI对象

          Public Function DownloadData ( address As String ) As Byte( )
          Public Function DownloadData ( address As Uri ) As Byte( )

返回一个byte类数组对象,其中包含下载的数据内容,紧接着将其直接写入文件或是其他的数据流进行保存即可。


DownloadFile( ) 接收两个参数,参数address代表从网络上下载文件的位置,fileName是下载的数据内容所要保存的文件位置名称

          Public Sub DownloadFile( ByVal address As String,By Val fileName As String )



举例

Imports System.Text
Imports System.Net


Public Class Form1
    Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click
        Dim wc As New WebClient
        Dim bytWeb() As Byte


        '获取网页源代码
        bytWeb = wc.DownloadData(txtAddress.Text)
        txtContent.Text = Encoding.Default.GetString(bytWeb,bytWeb.Length)


        '直接将源代码保存到本地文件中
        wc.DownloadFile(txtAddress.Text,txtSaveFile.Text)
    End Sub
End Class


二、取得数据流对象
WebClient类提供方法OpenRead,将结果以Stream对象的类返回。

             Public Function OpenRead ( ByVal address As String ) As Stream

在下载address网址的网络资源,只要读取其Stream对象,应用程序便可以取得所下载的内容

举例:

Imports System.Net
Imports System.IO

Public Class Form1
    Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click
        Dim wc As New WebClient
        Dim st As Stream
        Dim sr As StreamReader


        st = wc.OpenRead(txtAddress.Text) '取得下载流
        sr = New StreamReader(st)
        txtContent.Text = sr.ReadToEnd

        '如果想将流保存到文件:(代码略)
        '建立 一个文件流filestream
        '建立一个固定缓冲字节数组,用上面st循环读出
        '一边读,一边将缓冲字节写入,直到结束
        '参见, 笔记5:利用HttpWebResponse下载文件

    End Sub
End Class

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...