csvlist.initialize
Dim rw(3)As String
rw(0)="value1"
rw(1)="value2"
rw(2)="value3"
csvlist.Add(rw)
rw(0)="value1"
rw(1)="value2"
rw(2)="value3"
csvlist.Add(rw)
Dim CSVHeaders As List
CSVHeaders.Initialize2(Array As String("Field1","Field2","Field3")
Dim su As StringUtils
su.SaveCSV2(File.DirInternal,"mycsv.csv",",",csvlist,CSVHeaders)
Dim tr As TextReader
tr.Initialize(File.OpenInput(File.DirInternal,"mycsv.csv"))
Dim trs As String=tr.ReadAll
Dim tro As TextWriter
tro.Initialize2(File.OpenOutput(File.DirInternal,"mycsv2.csv",False),"Windows-1252")
tro.Write(trs)
tro.Close
FileHandler1.Initialize
Wait For (FileHandler1.SaveAs(File.OpenInput(File.DirInternal,"mycsv2.csv"), "text/csv", "mycsv2.csv")) Complete (Success As Boolean)