(DataFlex) Read Japanese utf-8 CSV File

Demonstrates how to read a utf-8 .csv file containing some Japanese characters.

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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoCsv
    Boolean iSuccess
    Integer iRow
    Integer n
    String sTemp1

    // This example program loads a file (japanese.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
    // 2010,silver,"太志","森田"
    // 

    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.
    // Important: Make sure to call LoadFile2 so that the charset (utf-8)
    // of the CSV file can be indicated.
    Get ComLoadFile2 Of hoCsv "qa_data/csv/japanese.csv" "utf-8" To iSuccess
    If (iSuccess <> True) Begin
        Get ComLastErrorText Of hoCsv To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // Display the contents of the 3rd column

    Get ComNumRows Of hoCsv To n
    For iRow From 0 To (n - 1)
        Get ComGetCell Of hoCsv iRow 2 To sTemp1
        Showln sTemp1
    Loop



End_Procedure