iOS Question File.OpenOutput return 'null'

[nicieri]

post2 is null? what am I doing wrong?



Sub Cam_Complete (Success As Boolean, Image As Bitmap, VideoPath As String)
If Success Then
If Image.IsInitialized Then
'for image
Else
'for video
vv.View.Visible = True
vv.LoadVideo(VideoPath, "")

Dim os2 As OutputStream
Log(VideoPath)
Dim ps() As String = Regex.split("/", VideoPath)
Dim fileName As String =(ps(ps.Length-1))
Dim path As String =""
For i = 0 To ps.Length-2
path = path & ps(i) & "/"
Next

Log(path & fileName) ' this is correct
os2.InitializeToBytesArray(0)
os2 = File.OpenOutput(path,fileName,True)
os2.Close

Dim p2 As StringUtils
Dim post2 As String = p2.EncodeBase64(os2.ToBytesArray)
Log(post2) ' post2 is 'null'

End If
End If
End Sub

 

[Erel]

Please use [code]code here...[/code] tags when posting code.

Are you trying to read the file into an array of bytes?

 

[nicieri]

Hi Erel, Yes. I'm trying this... reading into an array of bytes..

Why my post2 is null?

os2.InitializeToBytesArray(0)
os2 = File.OpenOutput(path,fileName,True)
os2.Close

This code is not working.

 

[Erel]

There are several mistakes in this code.
1. You initialize the object and then assign a new object to the same variable. The previously object is removed.
2. File.OpenOutput opens an output stream. Output streams are used to write data to a file.

Correct code:

Dim b() As Byte = Bit.InputStreamToBytes(File.OpenInput(path, fileName))

 

[nicieri]

There are several mistakes in this code.
1. You initialize the object and then assign a new object to the same variable. The previously object is removed.
2. File.OpenOutput opens an output stream. Output streams are used to write data to a file.

Correct code:

Dim b() As Byte = Bit.InputStreamToBytes(File.OpenInput(path, fileName))

Thanks Erel!!