Proxy

[Medves]

как винсоком конектится через прокси?

[Demonx]

Смотря зачем и каким прокси. Конектится нужно по старинке Winsock1.Connect "proxy.host.ru", 3128

Например чтоб получить страницу нужен вот такой запрос:

Winsock1.SendData "GET http://host.ru:80 HTTP/1.1" & vbCrLf & "Host: host.ru" & vbCrLf & vbCrlf

[MEMBER]

Обисняйу. Разница между прямым соединением и соединением через прокси (HTTP) в том, что в первом случае:
Прямое соединение

Код: Выделить всё

    URLS = "GET /user/filemanager.php HTTP/1.1" & vbCrLf _
            & "Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel," _              & " application/msword, application/x-shockwave-flash, */*" & vbCrLf _
            & "Referer: http://starstream.planetsky.com/user/filemanager.php" & vbCrLf _
            & "Accept-Language: ru" & vbCrLf _
            & "Accept-Encoding: gzip, deflate" & vbCrLf _
            & "User-Agent: Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0;" _
            & " MyIE2) " & vbCrLf _
            & "Host: starstream.planetsky.com" & vbCrLf _
            & "Pragma: no-cache" & vbCrLf _
            & "Authorization: Basic " & Pass & vbCrLf _
            & "Connection: Close" & vbCrLf _
            & vbCrLf & vbCrLf
wsFileFetch.SendData URLS


Прокси соединение

Код: Выделить всё

    URLS = "GET http://starstream.planetsky.com/user/filemanager.php HTTP/1.1" & vbCrLf _
            & "Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel," _              & " application/msword, application/x-shockwave-flash, */*" & vbCrLf _
            & "Referer: http://starstream.planetsky.com/user/filemanager.php" & vbCrLf _
            & "Accept-Language: ru" & vbCrLf _
            & "Accept-Encoding: gzip, deflate" & vbCrLf _
            & "User-Agent: Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0;" _
            & " MyIE2) " & vbCrLf _
            & "Host: starstream.planetsky.com" & vbCrLf _
            & "Pragma: no-cache" & vbCrLf _
            & "Authorization: Basic " & Pass & vbCrLf _
            & "Connection: Close" & vbCrLf _
            & vbCrLf & vbCrLf
wsFileFetch.SendData URLS


Обратите внимание на разницу в написании строки:
1) URLS = "GET /user/filemanager.php HTTP/1.1"
2) URLS = "GET http://starstream.planetsky.com/user/filemanager.php HTTP/1.1"
1) Для прямого соединения достаточно указать часть пути (оставшаяся часть описывается в Host: starstream.planetsky.com)
2) Для прокси соединения _обязательно_ указывается полный адрес.
Естественно, для работы через прокси Winsock.Connect должен производится на адрес прокси и порт прокси.