CSV-Datei lesen mit Umlauten (in Unicode UTF8)

02/11/2007 - 17:01 von Markus | Report spam
Wie kann man bitteschön beim laden der Daten aus einer CSV Datei das
OleDb.OleDbDataReader Encode auf Unicode UTF-8 setzen damit das lesen von
Umlauten möglich wird?

Aktuell werden komische Zeichen angezeigt wenn "à", "ö", "ü", "Ä", "Ö", "Ü"
oder "ß" -Zeichen gelesen wird.

Module Modul
Public oCNCSV As New OleDb.OleDbConnection
Public oCMDCSV As New OleDb.OleDbCommand
Public DatenCSV As OleDb.OleDbDataReader
End Module

Private Function DataReaderCSV(ByVal SQL As String) As OleDb.OleDbDataReader
oCMDCSV.CommandText = SQL
DataReaderCSV = oCMDCSV.ExecuteReader()
End Function

Private Sub DatenLaden_Click( ... )
Me.OpenFileDialog.InitialDirectory =
Environment.SpecialFolder.DesktopDirectory

If Me.OpenFileDialog.ShowDialog() = DialogResult.OK Then

Dim Datei As String
Dim Ordner As String
Datei = System.IO.Path.GetFileName(Me.OpenFileDialog.FileName)
Ordner = System.IO.Path.GetDirectoryName(Me.OpenFileDialog.FileName)

oCNCSV.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" &
Ordner & "\';Extended Properties=""text;HDR=Yes;FMT=Delimited"""
oCNCSV.Open()
oCMDCSV.Connection = oCNCSV
DatenCSV = DataReaderCSV("SELECT * FROM [" & Datei & "]")

While DatenCSV.Read()

' Daten in Zeile auslesen... XYZ = DatenCSV("Spaltename")

Application.DoEvents()
End While

End If

End Sub
 

Lesen sie die antworten

#1 Peter Fleischer
02/11/2007 - 17:26 | Warnen spam
"Markus" schrieb im Newsbeitrag
news:
Wie kann man bitteschön beim laden der Daten aus einer CSV Datei das
OleDb.OleDbDataReader Encode auf Unicode UTF-8 setzen damit das lesen von
Umlauten möglich wird?



In der schema.ini den passenden Eintrag einfügen.

Viele Gruesse

Peter

Ähnliche fragen