Чтение файла с http-сервера - VB

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

Как это реализовать, чтоб код работал. А то выдается ошибка путь не найден (смотри код).Вроде надо использовать функцию UrlOpenStream, а как не знаю, msdn нет у меня. Подскажите как быть

a = 'http://сайт/207-2002.txt' 
Open a For Input As #1 
Line Input #1, b$ 
c = MsgBox(b$) 
End Sub

Решение задачи: «Чтение файла с http-сервера»

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

                            Winsock1.Connect 'сайт', 80
time_out=5
do
doevents
if winsock1.state=sckconnected then goto 1
loop while timer -xx<time_out
msgbox('Timeout!'):end
1 winsock1.senddata 'GET /index.html HTTP/1.0'+vbcrlf
                        