Связь через прокси

Кто-нить может обяснить, как подключится (или наоборот ) к компу, который работает через прокси?

[moka]

Врдебы буржуи что-то делали, а может и нет, точно не знаю, но сам пытался не удалось.

[Progger_Leo]

Иденственное что я имею, так это прогу, которая может получать html-код web-страницы через прокси...и даже без него... Нате, мож кому-нить понабицца

Global BR$ = Chr$(13)+Chr$(10)
;1. обычный запрос веб-страницы
tcp = GetHttp("www.microsoft.com")
If tcp = False RuntimeError "unable to connect to web server"
While Eof(tcp) = False
Print ReadLine$(tcp)
Wend
CloseTCPStream(tcp)
 
; 2. запрос страницы через прокси-сервер с адресом 192.168.0.1 и портом 80
tcp = GetHttp("www.microsoft.com", 80,"192.168.0.1", 80)
If tcp = False RuntimeError "unable to connect to web server"
While Eof(tcp) = False
Print ReadLine$(tcp)
Wend
CloseTCPStream(tcp)
 
WaitKey
 
End
 
;========================================
Function GetHttp(server$, port=80, proxy$="",proxyport=0)
Local www
If Len(proxy$) = 0 proxy$ = server$
If proxyport = 0 proxyport = port
www = OpenTCPStream(proxy$,proxyport)
If www = False Return False
WriteLine www,"GET http://" + server$ + ":" + port + path$ + " HTTP/1.1" + BR$ + "Host: " + server$ + BR$ + "User-Agent: blitzbasic" + BR$ + "Accept: */*" + BR$
Return www
End Function 


[Tadeus]

Поднимаю старую тему! Очень надо! Есть одно решение - юзать либу К-Нет Либ, но оно мне не подходит Очень прошу Люди, если кто-то скажет - будет ему вечный респект и уважуха