If result.Tag = "descarregaficheiro" Then
ProgressDialogShow2(Main.trans.GetText("Importing")&"...",False)
For Each row() As Object In result.Rows
Dim out As OutputStream = File.OpenOutput(File.DirInternalCache,"out.csv",False)
Dim In As InputStream
Dim Buffer() As Byte
Buffer = row(0) ' gives error here, says that can not convert a string to byte array
In.InitializeFromBytesArray(Buffer, 0, Buffer.Length)
File.Copy2(In, out)
out.Close
In.Close