Не хотел напрягать с вопросами...вроде разобрался немножко сам
Посмотрите пожалуйста, может быть есть замечания. Хотел спросить правильно ли я транслировал в язык VB, так как точных примеров в нете я не нашел. Инспектировал с помощью плагина
http://www.ieinspector.com .
В бравзере было так:
(Request-Line):GET /hit?rhttp%3A//vkontakte.ru/********;s1440*900*32;uhttp%3A//vkontakte.ru/*********;*.************* HTTP/1.1
Host:counter.yadro.ru
User-Agent:Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.1.1) Gecko/20090715 Firefox/3.5.1
Accept:image/png,image/*;q=0.8,*/*;q=0.5
Accept-Language:ru,en-us;q=0.7,en;q=0.3
Accept-Encoding:gzip,deflate
Accept-Charset:windows-1251,utf-8;q=0.7,*;q=0.7
Keep-Alive:300
Connection:keep-alive
Referer:
http://vkontakte.ru/********
Cookie:VID=*************
Cache-Control:max-age=0
Я перевел это так:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
Dim HttpReq As New MSXML2.XmlHttp
Call HttpReq.open("GET /hit?rhttp%3A//vkontakte.ru/*********;s1440*900*32;uhttp%3A//vkontakte.ru/********;*.************* HTTP/1.1", "http://vkontakte.ru/", False)
HttpReq.setRequestHeader "Host", "Counter.yadro.ru"
HttpReq.setRequestHeader "User-Agent", "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.1.1) Gecko/20090715 Firefox/3.5.1"
HttpReq.setRequestHeader "Accept", "image/png,image/*;q=0.8,*/*;q=0.5"
HttpReq.setRequestHeader "Accept-Language", "ru,en-us;q=0.7,en;q=0.3"
HttpReq.setRequestHeader "Accept -Encoding", "gzip , deflate"
HttpReq.setRequestHeader "Accept-Charset", "windows-1251,utf-8;q=0.7,*;q=0.7"
HttpReq.setRequestHeader "Keep-Alive", "300"
HttpReq.setRequestHeader "Connection", "keep -alive"
HttpReq.setRequestHeader "Referer", "http://vkontakte.ru/********"
HttpReq.setRequestHeader "Cookie", "VID=*********"
HttpReq.send rQuery
stop
Text1 = HttpReq.responseText
Text3 = HttpReq.getAllResponseHeaders
'open "c:\prosto.txt" for output as #1:print #1,form1.Text1: close #1
Я проверял. У меня работает. Я просто не знаю правильно ли написал в HttpReq.open "GET /hit?rhttp%3A//vkontakte.ru/*********;s1440*900*32;uhttp%3A//vkontakte.ru/********;*.************* HTTP/1.1"
Я встречал только "GET" или "POST". Увидел в мозиле именно такую строчку, не было куда поставить, поставил в HttpReq.open
Работает. Просто поправте если не так что понял. Если правильно, так прошу подтвердить только.
