v7: КодоваяСтраница(); Как прочитать файл?
☑
0
Gamover
04.02.15
✎
19:44
CSV файл в кодировке UTF-8.
Когда начинаешь его обрабатывать построчно, то в место букв крокодилы.
Текст.Открыть(ИмяФайла);
Для к=1 по Текст.КоличествоСтрок() Цикл
Стр=Текст.ПолучитьСтроку(к);
Стр = "я¬¬я¬¬product_sku@product_name"
Предварительно открыть файл и поменять в нем кодировку не получится.
Как можно обработать такой?
1
Cap_1977
04.02.15
✎
19:46
В клюшках никак - или DOS866 или WIN1251.
2
mehfk
04.02.15
✎
19:50
MsgBox StrConv("бНОПНЯ","KOI8-R","Windows-1251")
Function StrConv(Text,SourceCharset,DestCharset)
Set Stream = CreateObject("ADODB.Stream")
Stream.Type = 2
Stream.Mode = 3
Stream.Open
Stream.Charset = SourceCharset
Stream.WriteText Text
Stream.Position = 0
Stream.Charset = DestCharset
StrConv = Stream.ReadText
End Function
3
ololoraise
05.02.15
✎
09:17
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой