-
Имеется вот такой код в JavaScript:
<form method="post" action="
http://smorye.apeha.ru/index.zhtml">
<input type="hidden" name="actUser-MLogin" value=1>
<input type="text" name="user{nick}">
<input type="text" name="user{password}">
</form>
Подскажите товарищи знатоки как мне сделать точно такой же через компонент IdHTTP
-
sl := TStringList.Create;
sl.Add('actUser-MLogin=1');
sl.Add('user=???');
sl.Add('user=***');
IdHTTP1.Post('http:
-
> Имеется вот такой код в JavaScript:
серьезно? всю свою недолгуб жизнь думал, что это html.
-
> sl := TStringList.Create;
> sl.Add('actUser-MLogin=1');
> sl.Add('user{nick}=???');
> sl.Add('user{password}=***');
> IdHTTP1.Post('http://smorye.apeha.ru/index.zhtml", sl);
Пробовал этот код, но как и раньше выдает ошибку HTTP/1.0 400 Bad Request
-
Все сделал, ошибка больше не вылазит, но и доступ я так и не получил...
-
> но и доступ я так и не получил...
Надо куки запоминать
-
> Надо куки запоминать
Приведите пожалуйсто пример работы с куками
-
Подключи CookeManager (вкладка Indy Misc) к IdHTTP
-
> Подключи CookeManager (вкладка Indy Misc) к IdHTTP
Хм... Он у меня подключен... А работать то с ним как?
-
Никак, он сам работает если Active включить
-
Благодарю, вроде все получилось)
-
Благодарю, вроде все получилось)
-
Я использую Indy 10, там в CookieManager нет своиства Active, полагаю он включен по умолчанию... Но есть такая проблема, я захожу на одну страницу авторизованым, если перехожу на другую ссылку то авторизация теряется... Подскажите что сделать что бы авторизация не терялась?
-
> DriveR_F (06.12.06 22:10) [4]
> Все сделал, ошибка больше не вылазит, но и доступ я так
> и не получил...
Доброго времени суток! Можно узнать как избавился от ошибки 400?
-
> DriveR_F (06.12.06 22:10) [4]
> Все сделал, ошибка больше не вылазит, но и доступ я так
> и не получил...
Доброго времени суток! Можно узнать как избавился от ошибки 400?
-
Извиняюсь, за два сообщения, браузер затупил..
-
Заставить менеджер куков работать:
©Не моё, найдено в инернете.
procedure TForm1.IdCookieManager1NewCookie(ASender: TObject;
ACookie: TIdCookieRFC2109; var VAccept: Boolean);
begin
VAccept := true;
if ACookie.Path='' then ACookie.Path:='/';
end;
-
Здарова мужики!!!
У меня такая задача:
надо сделать прогу которая работала бы как прокси,
использую TidHTTPServer и TidHTTP.
Когда browser обращается к TidHTTPServer, тот передает URL на TidHTTP,
TidHTTP полученную страницу обратно передает на TidHTTPServer и он его
возвращает browseru.
procedure TForm1.IdHTTPServer1CommandGet(AContext: TIdContext;
ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
AResponseInfo.ContentText:=IdHTTP1.Get(ARequestInfo.RawHTTPCommand);
end;
но рисунки не идут. почему?
и как можно получить параметры метода POST у TidHTTPServer?
-
Я отправляю данные методом POST. Набираю в переменную Query типа TStrings различную информацию строками
Query.Append('<?xml version="1.0" encoding="windows-1251"?>');
Query.Append('<root>');
Query.Append('<auth uid="1" pwd="password" vp="2"/>');
....и т.д. ...........
затем :
ResultQuery := HTTP.Post(AdressScripta, Query);
Анализ ResultQuery показал, что отправленные мной данные не верны. Тогда я вывел переменную Query в поле Memo:
mmPolya.Lines:=Query;
Увидел вместо вышеприведенных строк такие:
<?xml version=%221%2E0%22+encoding%3D%22windows%2D1251%2 2%3F%3E
<root>
<auth uid=%221%22+pwd%3D%22password%22+vp%3D%222%22%2F%3 E
Почему он заменил симолы кавычек, уголков и прочего на коды?
Delphi7
-
> malor (30.05.2007 13:26:18) [18]
Потому что RFC