Visual Basic.NET - Obtener una imagen

 
Vista:

Obtener una imagen

Publicado por El_Mayk (2 intervenciones) el 12/03/2008 01:00:51
Que tal, saludos a todos!

Estoy tratando de obtener la imagen de un "print screen" para guardarla como un archivo tipo jpg en una ruta especificada.

tengo esta pequeña instrucción, pero ahora no se como guardarla. Como declaro el archivo o qué tengo que hacer?

Dim iData As IDataObject = Clipboard.GetDataObject()
If iData.GetDataPresent(DataFormats.Bitmap) Then
Dim Nombre As String

Nombre = InputBox("Escriba el nombre del archivo asociado")

End If

De antemano mil gracias por la ayuda o por lo menos por la atención de leer el mensaje.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:Obtener una imagen

Publicado por P. J. (706 intervenciones) el 12/03/2008 18:05:27
...

Esto lo vi hace un tiempo, estuve buscando y llego a este enlace de microsoft
http://support.microsoft.com/kb/818410/es

Aca te lo dejo resuelto, por si no leiste el enlace XD

Private Sub btnGuardarImagen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGuardarImagen.Click
Dim iData As IDataObject = Clipboard.GetDataObject
If iData.GetDataPresent(DataFormats.Bitmap) Then
Dim Nombre As String
Nombre = InputBox("Escriba el nombre del archivo asociado")
Dim oImagen As System.Drawing.Image = iData.GetData(DataFormats.Bitmap, True)
oImagen.Save("C:" & Nombre & ".bmp", System.Drawing.Imaging.ImageFormat.Bmp)
MsgBox("Listo!")
End If
End Sub

Ya solo te cuesta validar la entrada del nombre.
Salu2
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar