Acceuilvb.net(712) convertir un tableau de bytes en image / une image en tableau de bytes
convertir un tableau de bytes en image / une image en tableau de bytes
2011-05-20
Voici une méthode permettant de convertir un tableau de bytes en image :
Public Shared Function ByteArray2Image(ByVal BArray As Byte()) As Image
Try
Dim mstImage As MemoryStream = New MemoryStream(BArray)
Dim img As Image = Image.FromStream(mstImage)
Return img
Catch ex As Exception
Return Nothing
End Try
End Function
Voici une méthode permettant de convertir une image (ici au format Jpeg) en un tableau de bytes :
Public Shared Function Image2ByteArray(ByVal img As Image) As Byte()
Try
Dim mstImage As MemoryStream = New MemoryStream
img.Save(mstImage, System.Drawing.Imaging.ImageFormat.Jpeg)
Dim bytImage As Byte() = mstImage.GetBuffer
Return bytImage
Catch ex As Exception
Return Nothing
End Try
End Function
Avenue des F.A.R. Rsidence Niama N6 - Ttouan (Maroc)
