Save file to list

rls456

Member
Licensed User
Longtime User
in the network example you save the outputstream to file is there a way to save it to a list not listview.

Dim out As OutputStream
out = File.OpenOutput(Main.TargetDir,fileName, False)
Dim count As Int
Do While fileSize > 0
count = InputStream1.ReadBytes(buffer, 0, Min(buffer.Length, fileSize))
out.WriteBytes(buffer, 0, count)
fileSize = fileSize - count
lblSize.Text = "Bytes left: " & NumberFormat(fileSize, 0, 0)
DoEvents 'If we hadn't previously disabled Timer1 then it would have raised this event again and caused havoc.
Loop
out.Close
 
Top