Я пытаюсь прочитать файл CSV построчно, используя ADODB.Stream.Когда я выполняю метод .ReadText (-2), он работает правильно для первой строки, но начинает обрезать начальные 2 символа из всех следующих строк и не читает последнюю строку.
Ниже приведен код, который я пробовал.
Set oTextStream = New ADODB.Stream
With oTextStream
.Charset = "utf-8"
.LineSeparator = adLF
.Open
.LoadFromFile (sFullPath)
End With
Do Until oTextStream.EOS
Debug.Print oTextStream.ReadText(-2)
Loop
Вместо печати: "Actuariale Organisaties"; "R12345"
Он печатает: Ctuariale Organisaties ";" R12345«