MSXML2 - Достигнут конец файла при недопустимом состоянии текущей кодировки. - VB

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

В общем-то, наверное просто не хватает знаний. Нагуглить тоже сходу не удалось.
В общем стандартным кодом

Dim XM As New MSXML2.XMLHTTP60
XM.Open "GET", "мой урл"
XM.send
Do While XM.ReadyState <> 4
  DoEvents
  If Abort Then XM.Abort: Goto Ab
Loop
t = XM.ResponseText

пытаюсь получить с сайта обычный текстовый файл в виндовой кодировке. Браузером я его спокойно получаю. Тут же на последней строке получаю ошибку:
"Достигнут конец файла при недопустимом состоянии текущей кодировки."
что удается нагуглить обычно касается работы с этим компонентом из html и рекомендации сводятся к тому, чтобы задать правильную кодировку.
пробовал перед send вставить строку

XM.setRequestHeader "Content-Type", "text/plain; charset=windows-1251"

не помогло.

Решение задачи: «MSXML2 - Достигнут конец файла при недопустимом состоянии текущей кодировки.»

textual
                            Листинг программы 
                        

                            Dim b() As Byte, t As String
...
b() = .responseBody
t = b()

                        