VB.Net by API/System.Net/WebClient
WebClient.DownloadData
<source lang="vbnet"> Imports System.Net Imports System.IO Imports System.Text
Public Class Tester
Public Shared Sub Main Dim myWebClient As New WebClient() Dim mybyte() As Byte mybyte = myWebClient.DownloadData("http://www.vbex.ru") myWebClient.DownloadFile("http://www.vbex.ru", "test.txt")
End Sub
End Class
</source>
WebClient.DownloadFile
<source lang="vbnet"> Imports System.Net Imports System.IO Imports System.Text
Public Class Tester
Public Shared Sub Main Dim myWebClient As New WebClient() Dim mybyte() As Byte mybyte = myWebClient.DownloadData("http://www.vbex.ru") myWebClient.DownloadFile("http://www.vbex.ru", "test.txt")
End Sub
End Class
</source>
WebClient.OpenRead
<source lang="vbnet"> Imports System.Net Imports System.IO Imports System.Text
Public Class Tester
Public Shared Sub Main Dim myWebClient As New WebClient() Dim myStream As Stream Dim myByte() As Byte Try myWebClient = New WebClient() myStream = myWebClient.OpenRead("http://www.vbex.ru") Dim myStreamReader As New StreamReader(myStream) Console.WriteLine(myStreamReader.ReadToEnd) Catch ex As Exception Console.WriteLine(ex.Message) End Try End Sub
End Class
</source>