Юникод -> Ansi
Прошу помощи. Необходима подпрограмма для VBA производящая перекодировку текстового файла из Юникод в ANSI. ICQ: 124797771
Цитата:
Originally posted by Russo
Прошу помощи. Необходима подпрограмма для VBA производящая перекодировку текстового файла из Юникод в ANSI. ICQ: 124797771
Прошу помощи. Необходима подпрограмма для VBA производящая перекодировку текстового файла из Юникод в ANSI. ICQ: 124797771
StrConv("ICQ: 124797771", vbFromUnicode)
Цитата:
Originally posted by HarryAxe
StrConv("ICQ: 124797771", vbFromUnicode)
StrConv("ICQ: 124797771", vbFromUnicode)
Спасибо. Действительно есть такая функция. Я ее пробовал, но ничего не получалось. Я открываю заведомо юникодовский файл, а должен получить файл ANSI. Вот кусок моего кода:
Line Input #1, TextLine
Print #2, TextLine
Line Input #1, TextLine
Print #2, TextLine
В итоге, в выходном файле получаю кроказяблу (кучю непонятных символов), и к тому же выходной файл получается намного меньше.
Но если убрать первые два символа - яю, то тогда действительно все замечательно работает.
Вот рабочий код, может кому-то пригодится.
Line Input #1, TextLine
Print #2, Mid(TextLine, 3)
Line Input #1, TextLine
Print #2, TextLine
Еще раз Большое Спасибо!
Вопрос снимается с обсуждения.