VB.NET

how to read this file

Please support our VB.NET advertiser: Intel Parallel Studio Home

•

Join Date: Nov 2008

Posts: 21

Reputation: the_swan is an unknown quantity at this point

Solved Threads: 0

the_swan

Offline

Newbie Poster

how to read this file

Dec 7th, 2008

hiiiiiiiiiiiiiiii

I'm going to store a selected image from fileupload
and save the image in a array of byte in a file

"the code"

Dim _fileName As String = Request.PhysicalApplicationPath & FileUpload1.FileName
Dim _byte() As Byte = FileUpload1.FileBytes()
Dim _file As New IO.FileStream(_fileName, IO.FileMode.Create)

For _i As Integer = 0 To _byte.Length - 1
_file.WriteByte(_byte(_i))

my problem is how to read this file ???

•

Join Date: Aug 2008

Posts: 710

Reputation: Teme64 will become famous soon enough

Solved Threads: 114

Teme64

Offline

Master Poster

Re: how to read this file

Dec 8th, 2008

Here's an easier way to do that:

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
' Write byte array
My.Computer.FileSystem.WriteAllBytes(_fileName, _byte, False)
' Read byte array
 _byte = My.Computer.FileSystem.ReadAllBytes(_fileName)
' Write byte array
My.Computer.FileSystem.WriteAllBytes(_fileName, _byte, False)
' Read byte array
 _byte = My.Computer.FileSystem.ReadAllBytes(_fileName)

But if you still want to use the FileStream:

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Dim _FileSize As Long
_FileSize = _file.Length
For _i As Long = 0 To _FileSize - 1
   _byte(CInt(_i)) = CByte(_file.ReadByte())
Next _i
Dim _FileSize As Long
_FileSize = _file.Length
For _i As Long = 0 To _FileSize - 1
   _byte(CInt(_i)) = CByte(_file.ReadByte())
Next _i