![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите составить метод IdHTTP1.Post [D7, WinXP]
alucard © (2006-11-17 12:00:00)Доброго времени суток.
Есть почтовый ящик:
на сайте http://mail.i.ua/
Есть код:
procedure TForm1.Button1Click(Sender: TObject);
var
LoginInfo: TStrings;
Response: TStringStream;
begin
LoginInfo := TStringList.Create;
Response := TStringStream.Create('');
LoginInfo.Clear;
LoginInfo.Add('login=allucard911');
LoginInfo.Add('pass=operation');
// LoginInfo.Add('level=1');
IdHTTP1.Post(' http://i.ua/login.php',LoginInfo, Response);
Memo1.Lines.Add(Response.DataString);
Response.Free;
LoginInfo.Free;
end;
При нажатии кнопки пишется
Message "HTTP/1.1 302 Found"
Что это за ошибка?
Вроде всё правильно делаю.
Anatoly Podgoretsky (2006-11-17 13:19:00) [21]> alucard (17.11.2006 12:23:03) [3]
Не знаю делает компонент автоматически это, но никто тебе не мешает по возвращенному адресу обратиться самостоятельно.
alucard (2006-11-17 12:23:00) [22]
> Anatoly Podgoretsky © (17.11.06 12:16) [2]
Понял, скорее всего так и есть.
Как мне всётаки правильно соедениться?
Anatoly Podgoretsky (2006-11-17 12:16:00) [23]> alucard (17.11.2006 12:00:00) [0]
Это значит, что информация находится на другом сайте
alucard (2006-11-17 12:07:00) [24]Собственно страничка:
Вход на почту
Логин:
запомнить
Пароль:
Забыл свой пароль
Регистрация