Форум программистов, компьютерный форум, киберфорум
Delphi: Сети
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
15 / 15 / 14
Регистрация: 19.08.2012
Сообщений: 97
1
RAD XE3+

Загрузка страниц через корпоративный прокси (Proxy)

06.02.2019, 11:04. Просмотров 1056. Ответов 1


Добрый день!
Мучаюсь уже несколько дней, и никак не могу выйти в просторы интернета в свой программе.
Пишу программу на работе. доступ в интернет происходит через Прокси сервер (Установлен параметр "Использовать прокси-сервер для локальных подключений (не применяется для коммутируемых или VPN-подключений)").

Я использую связку IdHTTP + IdSSLIOHandlerSocketOpenSSL. SSL библиотеки есть. На домашнем компьютере, без использования Прокси, программа работает отлично. Проверяю на http://ya.ru/

На работе же никак не могу заставить программу подключиться через прокси. использовал три варианта, ни один не работает:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
  case ProxyType of
    ptHTTP:
      with idHTTP1.ProxyParams do 
      begin
        ProxyServer := e_ProxyServer.Text;
        ProxyPort := StrToIntDef(e_ProxyPort.Text,0);
        ProxyUsername := e_ProxyUsername.Text;
        ProxyPassword := e_ProxyPassword.Text;
        BasicAuthentication := chb_BasicAuthentication.Checked;
      end;
    ptSocks:
      with IdSocksInfo1 do //IdSocksInfo1 подключен в IdSSLIOHandlerSocketOpenSSL1
      begin
        Host := e_ProxyServer.Text;
        Port := StrToIntDef(e_ProxyPort.Text,0);
        Username := e_ProxyUsername.Text;
        Password := e_ProxyPassword.Text;
        if chb_BasicAuthentication.Checked then
          Authentication := saUsernamePassword
        else
          Authentication := saNoAuthentication;
      end;
    ptSSLIOHandler:
      with IdSSLIOHandlerSocketOpenSSL1.TransparentProxy do
      begin
        Host := e_ProxyServer.Text;
        Port := StrToIntDef(e_ProxyPort.Text,0);
        Username := e_ProxyUsername.Text;
        Password := e_ProxyPassword.Text;
      end;
  End;
В полях содержимое типа:
Delphi
1
2
3
4
e_ProxyServer.Text = 11.22.33.10 //Взял из настроек браузера 
e_ProxyPort.Text = 8080 //Взял там же
e_ProxyUsername.Text = domen\UserName //Логин входа в компьютер
e_ProxyPassword.Text = Qqqq1234 //Пароль для входа в компьютер
Ошибка EIdSocketException: 10061 Connection refused.

При использовании компонентов EmbeddedWB (EmbeddedWB, IEParser) все работает хорошо: просто кидаю на форму, параметры не меняю - сайты грузит.

Система:
Windows 10
Delphi XE5
Indy 10.1.5.0

P.S.:
Пробовал связки IdHTTP + IdSSLIOHandlerSocketOpenSSL и IdHTTP + IdSSLIOHandlerSocketOpenSSL + IdSocksInfo - результат не меняется.
Имя пользователя пробовал и с доменом и без, и в формате UserName@domen - результат не меняется.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.02.2019, 11:04
Ответы с готовыми решениями:

L2TP/IPSec или VPN через корпоративный proxy
Суть: есть локальная сеть 172.26.10.0/24, выход в интернет из нее через прокси 172.26.15.252 по...

Загрузка документа с удалённого сервера через Proxy
Здравствуйте, мне надо сделать скрипт, который будет читать файл с другого сервера через прокси...

Бесплатный корпоративный прокси
Может кто-нибудь сбросит ссылку на крякнутый прокси-сервер. Устала гуглить. Всё с лицензией....

Как на роутере открыть доступ на корпоративный прокси?
В наличие роутер Asus WL-520GU с прошивкой от Олега. Есть корпоративный прокси с аутентификацией....

1
15 / 15 / 14
Регистрация: 19.08.2012
Сообщений: 97
06.03.2019, 11:54  [ТС] 2
Никто не подскажет?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.03.2019, 11:54

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Загрузка сайта через прокси
Нужно написать программу меняющую прокси сервера (т.к написаныые другими людьми программы мне не...

Загрузка страницы с использованием прокси через WinInet API
Оч нужно загрузить страницу используя прокси. Использую для этого код: Public Const...

Прорыв через ISA proxy ошибку HTTP/1.1 407 Proxy Authentication Required
мой клиент на си++ по http протоколу общается с моим же сервром. Если на пути тупое прокси, то всё...

Отражение, прокси-объекты. Переменная proxy не отдает Test.Get()
Доброго времени суток. Ковыряю сабж. Сделал по примеру из учебника, однако переменная proxy не...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.