Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Посылка Post запроса с IdHTTP

Автор: JanMihail 19.10.2007, 10:21

Форма такая:

Код


<form action="money1.php3" method="post" id=form1 name=form1>
  <tr>
    <td>Номер:</td>
    <td><input name="pid" size="18" maxlength="12" class='textbox'></td>
  </tr>
  <tr>
    <td>Логин:</td>
    <td><input name="name" size="13" class='textbox'></td>
  </tr>
  <tr>
    <td>Пароль:</td>
    <td><input name=password type=password size="9" maxlength="8" class='textbox'></td>
  </tr>
  <tr align="center">
    <td colspan=2><input type=submit name="B" value="Add" class='button' style='width:70px'></td>
  </tr>
</form>

Подскажите пожалуйста, как послать эту форму с помощью IdHTTP или еще чего-либо, и узнать принял ли сервер введенные данные за верные или нет.

Если сервер принял данные за верные, то грузится страница money2.php3 и в этом случае ее нужно показать, а в обратном случае грузится index.php3, и там написано, какие данные введены неверно.

Я реализовывал этот запрос при помощи TWebBrowser, но такой подход оказался очень долгим.
1. Я посылал запрос при помощи TWebBrowser.Navigate(...)
2. Ждал загрузки страницы
3. Считывал код страницы
4. Если в нем встречался текст "Неверный логин", "Неверный пароль" и.т.д, то значит сервер принял данные за ошибочные, иначе в него загружалась страница money2.php3

Буду очень признателен, если Вы мне подскажете как можно ускорить этот процесс