Quick,easy download

[snarfblam]

Is there any quick and easy way to download or create a stream for a text file on the internet?

 

[snarfblam]

Sub Download()

Sorry, I should have googled first. Using what I found on the net, I wrote this function in about ten minutes...
[VB]
Public Shared Sub Download(ByVal URL As String, ByVal FileName As String)
Dim Request As HttpWebRequest = CType(HttpWebRequest.Create(URL), HttpWebRequest)
Dim Response As HttpWebResponse = CType(Request.GetResponse(), HttpWebResponse)
Dim WebStream As Stream = Response.GetResponseStream()
Dim InputBuffer() As Byte = New Byte(CInt(Response.ContentLength) - 1) {}
WebStream.Read(InputBuffer, 0, InputBuffer.Length)
Dim FileStream As New FileStream(FileName, FileMode.OpenOrCreate, FileAccess.Write)
FileStream.Write(InputBuffer, 0, InputBuffer.Length)
WebStream.Close()
FileStream.Close()
End Sub
[/VB]