Mettre un fichier dans un tableau de Bytes


Contenu du snippet

Public Function FichierVersTableauDeByte(ByVal CheminFichier As String) As Byte() 
	Dim MonFichier As New System.IO.FileInfo(CheminFichier)
	Dim MonFileStream As System.IO.FileStream = MonFichier.OpenRead() 
	Dim TableauDeBytes(MonFileStream.Length) As Byte

	' On charge le fichier dans un tableau de byte
	MonFileStream.Read(TableauDeBytes, 0, MonFileStream.Length)

	' On ferme le stream
	MonFileStream.Close()
	Return TableauDeBytes 

End Function

 
' Exemple d'utilisation :
Dim MesBytes() As Byte
MesBytes = FichierVersTableauDeByte("C:\LeChemin\DeVotre\Fichier.Ext")



Compatibilité : VB 2005, VB.NET 1.x

Disponible dans d'autres langages :

A voir également