Вывод в HTML файл в UTF-8 - VB

Узнай цену своей работы

Формулировка задачи:

Суть проблемы: есть код, который парсит rss ленты, русского языка это чудо как оказалось не понимает Что удалось обнаружить:
Также удалось обнаружить, что при выводе данных в .html файл меняется его кодировка. Гуглил - не нашел решения

Решение задачи: «Вывод в HTML файл в UTF-8»

textual
Листинг программы
Sub bb()
Dim s$
s = "<html><head><meta http-equiv=""Content-type"" content=""text/html; charset=utf-8""></head>" & _
    "<body>Это текст на русском!</body></html>"
 
With CreateObject("ADODB.Stream")
    .Charset = "utf-8"
    .Open
    .Writetext s
    .SaveToFile "c:\temp\RSS_FEED.html"
End With
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

11   голосов , оценка 4.182 из 5
Похожие ответы