Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Интернет и сети
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 27.03.2012, 21:54
bakanaev bakanaev вне форума
Прохожий
 
Регистрация: 27.03.2012
Сообщения: 3
Репутация: 10
По умолчанию Тупость idhttp.post (Прoблeмa. Есть рeшeниие?)

Здравствуйте. Возникла проблем. Делаю post запрос (IdHttp1.post)
Код:
 
page := IdHttp1.post('https://secure.site.org/site/API',data);
 
 if pos('!!!!!!!!!!!!!Тут то что мне надо!!!!!!!!!!!!!!!!',page )<>0 then
     begin
       Label1.Caption:='БЛА1';
     end
   else
    Label1.Caption:='БЛА2';
В ответ получаю "HTTP/1.1 403 Forbidden", НО!!!!
Ответ на мой post запрос (Смотрел в снифере)
Код HTML:
HTTP/1.1 403 Forbidden Date: Tue, 27 Mar 2012 01:52:21 GMT Server: Apache Cache-Control: private Set-Cookie: JServSessionIdr004=q1j2d0y1m4.app214a; path=/site/ Transfer-Encoding: chunked Content-Type: text/xml; charset=UTF-8 236 <?xml version="1.0" encoding="UTF-8"?> <Response xsi:schemaLocation="http://site.com/crm/v1.0 http://service.site.net/xmlschema/crm.public.v1.xsd" xmlns="http://convio.com/crm/v1.0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> <errors> <code>101</code> <message>!!!!!!!!!!!!!Тут то что мне надо!!!!!!!!!!!!!!!(Обычный текст)</message> <reason>FIELD_VALIDATION</reason> <pageError>!!!!!!!!!!!!!Тут то что мне надо!!!!!!!!!!!!!!!(Обычный текст)</pageError> <fieldError>!!!!!!!!!!!!!Тут то что мне надо!!!!!!!!!!!!!!!(Обычный текст)</fieldError> </errors> </Response> 0

+Браузер получает 100% идентичный ответ (смотрел в снифере)

При вылете этого сообщения работа программы останавливается, естественно ни какого парсинга переменной page не происходит.
Прошу помощи в решении данной проблемы.
P.S В практическом программирование всего 4 дня)) Так что если будите что то описать, прошу делать это как можно подробнее )))
P.P.S Есть у кого нибудь кряк для Embarcadero® RAD Studio XE2 Version 16.0.4429.46931 ??
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 03:17.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025