(PowerBuilder) 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

integer li_rc
oleobject loo_Csv
integer li_Success
integer li_Row
integer n

// 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,"太志","森田"
// 

loo_Csv = create oleobject
// Use "Chilkat_9_5_0.Csv" for versions of Chilkat < 10.0.0
li_rc = loo_Csv.ConnectToNewObject("Chilkat.Csv")
if li_rc < 0 then
    destroy loo_Csv
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// Prior to loading the CSV file, indicate that the 1st row
// should be treated as column names:
loo_Csv.HasColumnNames = 1

// 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.
li_Success = loo_Csv.LoadFile2("qa_data/csv/japanese.csv","utf-8")
if li_Success <> 1 then
    Write-Debug loo_Csv.LastErrorText
    destroy loo_Csv
    return
end if

// Display the contents of the 3rd column

n = loo_Csv.NumRows
for row = 0 to n - 1
    Write-Debug loo_Csv.GetCell(li_Row,2)
next


destroy loo_Csv