Форум программистов, компьютерный форум, киберфорум
Delphi: Сети
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
 Аватар для FearDog
15 / 15 / 14
Регистрация: 19.08.2012
Сообщений: 105
RAD XE3+

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

06.02.2019, 11:04. Показов 1706. Ответов 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
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
06.02.2019, 11:04
Ответы с готовыми решениями:

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

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

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

1
 Аватар для FearDog
15 / 15 / 14
Регистрация: 19.08.2012
Сообщений: 105
06.03.2019, 11:54  [ТС]
Никто не подскажет?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
06.03.2019, 11:54
Помогаю со студенческими работами здесь

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

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

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

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

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


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
Расскажи мне о Мире, бродяга
kumehtar 12.11.2025
— Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru