Microsoft.VisualBasic.FileIO.TextFieldParser zmienia ± Ascii 241 na? Ascii 63

Question

Używam Microsoft.VisualBasic.Fileio.TextFieldParser do parsowania pliku CSV utworzonego w programie Excel 2003. Parser działa świetnie z tym wyjątkiem, że konwertuje rozszerzone wartości ASCII na znaki zapytania! Więc jeśli zawartość pliku brzmiała:

± 3
TextFieldParser wraca
? 3

Próbowałem wszystkich kodowań w pakiecie System.Text.Encoding bez powodzenia. Myślałem, że mam go z UTF7, ale to upuszczanie innych znaków, takich jak zastąpienie znaku + spacją.

Każda pomoc zostanie bardzo doceniona.

Answer 1

Domyślnie Microsoft.VisualBasic.Fileio.TextFieldParser kodowania UTF8, ale plik tekstowy jest w bieżącym kodowaniu ANSI systemu. Użyj jednego z konstruktorów, które pobierają kodowanie typu: TextFieldParser(string path, Encoding defaultEncoding).

Można podać System.Text.Encoding.Default dla kodowania lub skonstruować nowy obiekt kodowania przechodzący na stronie kodowej. Domyślnym językiem w angielskim Windows jest 1252.

Answer 2

Dim s As String = "± 3" 
    'this produces the ? 
    Dim b() As Byte = System.Text.ASCIIEncoding.ASCII.GetBytes(s) 

    'try this 
    Dim anEncoding As System.Text.Encoding = System.Text.Encoding.GetEncoding(28591) 
    b = anEncoding.GetBytes(s) 

    s = anEncoding.GetChars(b) 'check to see if it round-trips