(DataFlex) CSV Special Chars - Comma, Double-Quotes

The Chilkat CSV class/component automatically handles special characters which include double-quotes, and the delimiter character (comma or semicolon).

The Chilkat CSV library/component/class is freeware. The downloads for .NET, C++, Perl, Java, Ruby, and Python contain all of the Chilkat classes, some of which are freeware and some of which require licensing.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoCsv
    Boolean iSuccess
    String sCsvDoc
    String sTemp1

    // This example program loads a file (sample.csv)
    // that contains this content:
    // 
    // year,color,country,food
    // 2001,red,France,cheese
    // 2005,blue,"United States",hamburger
    // 2008,green,Italy,pasta
    // 1998,orange,Japan,sushi
    // 
    // The first row contains the column names.
    // This file is available at:
    // http://www.chilkatsoft.com/testData/sample.csv

    Get Create (RefClass(cComChilkatCsv)) To hoCsv
    If (Not(IsComObjectCreated(hoCsv))) Begin
        Send CreateComObject of hoCsv
    End

    // Prior to loading the CSV file, indicate that the 1st row
    // should be treated as column names:
    Set ComHasColumnNames Of hoCsv To True

    // Load the CSV records from the file:

    Get ComLoadFile Of hoCsv "sample.csv" To iSuccess
    If (iSuccess <> True) Begin
        Get ComLastErrorText Of hoCsv To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // A field may contain the delimiter character (in this case
    // the delimiter is a comma):
    // Change "cheese" to "cheese,baguette"
    // ("cheese" is at row=0, column=3
    Get ComSetCell Of hoCsv 0 3 "cheese,baguette" To iSuccess

    // A field may also contain double-quotes:
    // Change blue to shiny "metallic" blue
    Get ComSetCell Of hoCsv 1 1 'shiny "metallic" blue' To iSuccess

    // Write the updated CSV to a string and display:

    Get ComSaveToString Of hoCsv To sCsvDoc
    Showln sCsvDoc

    // Save the CSV to a file:
    Get ComSaveFile Of hoCsv "out.csv" To iSuccess
    If (iSuccess <> True) Begin
        Get ComLastErrorText Of hoCsv To sTemp1
        Showln sTemp1
    End

    // The out.csv contains this:
    // year,color,country,food
    // 2001,red,France,"cheese,baguette"
    // 2005,"shiny ""metallic"" blue","United States",hamburger
    // 2008,green,Italy,pasta
    // 1998,orange,Japan,sush


End_Procedure