Visual Basic.NET - Ayuda con Imagenes en Mysql

 
Vista:

Ayuda con Imagenes en Mysql

Publicado por Modesto Martinez (11 intervenciones) el 08/05/2008 22:01:31
Hey Huguin Estoy pendiente con las funciones

Para todos !!!!! necesito guardar imagenes en mysql..

Huguin me envio dos funciones.

'Covertir de Imagen a Binario
Public Function Imagen_Bytes(ByVal Foto As Image) As Byte()
If Not Foto Is Nothing Then
Dim Codi As New IO.MemoryStream
Foto.Save(Codi, Imaging.ImageFormat.Jpeg)
Return Codi.GetBuffer
Else
Return Nothing
End If
End Function

'Convertir de Binario as Imagen
Public Function Bytes_Imagen(ByVal Foto As Byte()) As Image
If Not Foto Is Nothing Then
Dim Codi As New IO.MemoryStream(Foto)
Dim resultado As Image = Image.FromStream(Codi)
Return resultado
Else
Return Nothing
End If
End Function

Cargue las dos funciones en un modulo

luego en el formulario las ajecuto y le mando el parametro de la imagen

Dim ximagen As Byte
ximagen = Imagen_Bytes(Me.PictureBox5.Image)

Me da un error..
Una valor de tipo '1-matriz Dimensional de Byte no se puede convertir en un Byte

Ahora estoy enviando bien el parametro ???
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