Converting Data between Stream and Bytes

Stream to Array of Bytes

Private Function ConvertStreamToByteArray(ByVal input As Stream) As Byte()

        Dim data As Byte()

        Using br = New BinaryReader(input)

            data = br.ReadBytes(input.Length)

        End Using

        Return data

End Function

Array of Bytes to Stream

Private Function ConvertByteArrayToStream(ByVal bytFile As Byte()) As Stream

        Return New MemoryStream(bytFile)

End Function

Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s