Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Indy POST не передает параметр Connection (сайт заблокирован Ростелекомом) / 3 сообщений из 3, страница 1 из 1
15.07.2017, 22:39:29
    #39489606
Kerberos56
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Indy POST не передает параметр Connection (сайт заблокирован Ростелекомом)
Доброго времени суток уважаемые форумчане. Суть проблемы такова. Пишу запрос на авторизацию (POST)Indy. Авторизация на сайте букмекерской конторы ****, Ростелекомом данный ресурс заблокирован. В ответ на запрос получаю HTTP/1.1 503 Service Temporarily Unavailable. Через веб-морду захожу через прокси(прозрачные). Сравнивал Хейдеры через ххтпанализатор и заметил что не передается параметр Connection,хотя в настройках он явно указан. Пробывал подключать прокси результат тот же самый((( Подскажите как быть((( Может прокси неправильно настраивал???
Куда копать...только не кидайте камнями
Заранее благодарен

Код: pascal
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.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
procedure TForm1.Button1Click(Sender: TObject);
var
LoginData, Response: TStringList;
error_text, name, rep: string;
///Headers:TIdheaderList ;
 //SSLHandler : TIdSSLIOHandlerSocketOpenSSL;
begin
 //HTTP:= TIdHTTP.Create(Application);
/////SSLHandler:= TIdSSLIOHandlerSocketOpenSSL.Create(HTTP);
////HTTP.IOHandler:= SSLHandler;
////SSLHandler.SSLOptions.Mode:= sslmClient;
////SSLHandler.SSLOptions.Method := sslvSSLv3;

LoginData := TStringList.Create;
Response := TStringList.Create;
 idHTTP1.Request.CustomHeaders.Add('Upgrade-Insecure-Requests: 1');
try
  IdHTTP1.Request.UserAgent := 'Mozilla/5.0 (Windows NT 6.1; rv:54.0) Gecko/20100101 Firefox/54.0';
 IdHTTP1.Request.Host := 'www.parimatch.com ' ;
   IdHTTP1.Request.ContentType:=' application/x-www-form-urlencoded'  ;
    IdHTTP1.Request.Referer:= 'https://www.parimatch.com/?login=1';///?login=1';
    IdHTTP1.Request.Connection:='keep-alive';
    IdHTTP1.Request.AcceptLanguage:='ru-RU,ru;q=0.8,en-US;q=0.5,en;q=0.3';
    IdHTTP1.Request.AcceptEncoding:= 'gzip, deflate';
      //IdHTTP1.Request.Headers.Add("Upgrade-Insecure-Requests","1");
   // idHTTP1.Request.CustomHeaders.Add('Upgrade-Insecure-Requests: 1');

   LoginData.Add('qt=dd84221f4e9f08715063238f07130f6c');
  LoginData.Add('username=' + Edit1.Text);
  LoginData.Add('passwd=' + Edit2.Text);

  //LoginData.Add('a=2');
  //LoginData.Add('ajax=1');
  //LoginData.Add('rnd=218');
  //LoginData.Add('_tp_=xml');
  Response.Text := IdHTTP1.Post('https://www.parimatch.com/?login=1 ', LoginData);
  Memo1.Lines.Add(Response.Text);

  Memo1.Lines.Add('Авторизация успешна!');
  

except
    on E : Exception do
      begin showmessage('Error: '+E.Message);
      Memo1.Lines.Add('Ошибка в работе программы');
      end;
  end;
...
Рейтинг: 0 / 0
17.07.2017, 10:52:12
    #39490003
энди
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Indy POST не передает параметр Connection (сайт заблокирован Ростелекомом)
Для начала определите тип блокировки которым РТ блочит конечный сайт, вполне допускаю что там еще на уровне DNS все срезает.
...
Рейтинг: 0 / 0
17.07.2017, 17:27:13
    #39490322
Kerberos56
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Indy POST не передает параметр Connection (сайт заблокирован Ростелекомом)
энди,
Спасибо что обратили внимание на мой вопрос....Вроде не по ДНС раз разрешен любой обход блокировки скрин прилогаю Выполнено в программе BlockChek
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Indy POST не передает параметр Connection (сайт заблокирован Ростелекомом) / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]