BlogoDev

Ahorita solo por gusto estoy haciendo un scrren saver que obtiene imagenes desde Internet. Para ello, modifiqué un poco una función encontrada aqui para que al darle a la función la dirección URL de la imagen que deseamos, nos regrese un objeto de tipo Image para hacer con ella lo que necesitemos:

Public Function LoadWebImage(ByVal ImageURL As String) As Image
Dim objImage As IO.MemoryStream
Dim objwebClient As System.Net.WebClient
Dim sURL As String = Trim(ImageURL)
Dim img As Image = Nothing
Try
If Not sURL.ToLower().StartsWith("http://") Then sURL = "http://" & sURL
objwebClient = New Net.WebClient()
objImage = New  IO.MemoryStream(objwebClient.DownloadData(sURL))
img = Image.FromStream(objImage)
Catch ex As Exception
'Cargar una imagen que indique que no se pudo leer la imagen de Internet
img = new Bitmap("noimage.jpg")
End Try
Return img
End Function