Picture Help ! (resovled)

[Stick]

I was wondering if anyone new how to grab an image from a URL. Lets say http://us.i1.yimg.com/us.yimg.com/i/ww/m6v9.gif that is just the yahoo.com top image. I want to take that image from the web and download it. The a user presses a button and the picturebox becomes that picture.


Or....
Say there is a form with a picture control, a text box, and a buttonm. The user types a url of a picture such as (http://us.i1.yimg.com/us.yimg.com/i/ww/m6v9.gif) in the textbox and the presses the button. The picture gets loaded in the picture box.
Thanks for any help
Sean

[Pirate]

This from VBCodeBook ....

Imports System
Imports System.IO
Imports System.Net
Imports System.Text
'This import is required to gain access to the new namespace
Imports LoadImageFromWeb.ImageStream
 
Public Class Form1
    Inherits System.Windows.Forms.Form
    Private Sub btnLoadWebImage_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLoadWebImage.Click
        'Loads a picture box with an image from a website
        Const PATH_TO_IMAGE = "http://www.vbforums.com/images/ads/current.gif"
        Dim xImage As ImageToDownload = New ImageToDownload(PATH_TO_IMAGE)
        Dim xStream As MemoryStream = xImage.BeginDownload()
        picFromWeb.Image = Image.FromStream(xStream)
    End Sub
 
End Class
 
Namespace ImageStream
 
    Public Class ImageToDownload
        Dim sI2D_URL2Download As String
        Const PREFIX = "http://"
 
        Public Sub New(ByVal sURL As String)
            Me.sI2D_URL2Download = sURL
        End Sub
 
        Public Function BeginDownload() As MemoryStream
            Dim msImage As MemoryStream
            Dim wcClient As WebClient = New WebClient()
 
            If Not sI2D_URL2Download.ToLower().StartsWith("http://") Then sI2D_URL2Download = PREFIX + sI2D_URL2Download
            msImage = New MemoryStream(wcClient.DownloadData(sI2D_URL2Download))
 
            Return msImage
        End Function
    End Class
 
End Namespace

[Stick]

I can't figure out how to make this work..
can anyone help

thanks

[Pirate]

umm, wait then ..........

[Pirate]

try this now .....

[Stick]

thanks..
I am stupid at vb..

I used to kinda know it now it is all BLAH!
thanks alot

[Pirate]

working ??

[Stick]

Yes....
Thanks man.

[PT Exorcist]

in vb doing

dim MyClass as Class = new Class() isnt the same as
dim myClass as new Class()
?

[Pirate]

Originally posted by PT Exorcist
in vb doing

dim MyClass as Class = new Class() isnt the same as
dim myClass as new Class()
?

in this case , it seems same thing .