Скачиваю страничку через WinHTTP, но там проблема с кодировкой - VB

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

Здравствуйте Проблемка в кодировке, скачиваю страничку через WinHTTP, там русские буквы в текстбоксе вижу: "Eniieucoaiue ycue:" За место: "Используемый язык:" POST запрос:

                    Листинг программы
                
 
                        
                          
                    
http.Open "POST", "http://" & site & "/index.php"
http.SetRequestHeader "USER-AGENT", "User-Agent: Opera/9.80 (Windows NT 5.1; U; ru) Presto/2.9.168 Version/11.51"
'http.SetRequestHeader "Accept-Encoding", "gzip, deflate"
'http.SetRequestHeader "Accept-Charset", "windows-1251,utf-8;q=0.7,*;q=0.7"
'http.SetRequestHeader "Accept-Language", "ru,en-us;q=0.7,en;q=0.3"
http.SetRequestHeader "Referer", "http://" & site & "/"
http.SetRequestHeader "Cache-Control", "no-cache"
http.SetRequestHeader "Keep-Alive", "300"
http.SetRequestHeader "Connection", "Keep-Alive"
http.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
http.Send

Не получается никак нормальный русский язык получить.. Пробовал Accept-Charset вот вставлять и ничего не менялось.. Кто нибудь помогите.

Решение задачи: «Скачиваю страничку через WinHTTP, но там проблема с кодировкой»

textual
                            Листинг программы 
                        
 
                        
                          
                    
' в форму
'Text1.Text = Convert(Text1.Text, 866, 1251) 'dos->win
'Text1.Text = Convert(Text1.Text, 1251, 866) 'win->dos
'Text1.Text = Convert(Text1.Text, 28595, 1251) 'iso->win
'Text1.Text = Convert(Text1.Text, 1251, 28595) 'win->iso
'Text1.Text = Convert(Text1.Text, 20866, 1251) 'koi8r->win
'Text1.Text = Convert(Text1.Text, 20866, 1251) 'win->koi8r