Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.11.2010, 13:55   #1
dacorp
Пользователь
 
Регистрация: 12.06.2010
Сообщений: 48
Вопрос Отправка POST с получением страницы

Здравствуйте!

Есть скрипт, скажем:
Код:
http://localhost/test/delphi.php
Я отправляю данные POST нажатием кнопки в приложении, аналогичный данному коду:
Код:
<form method="post" action="delphi.php">
 <input name="c">
 <input name="v">
 <input name="s">
 <input type="submit" name="btn" value="OK">
</form>
и получаю стриничку в TWebBrowser.

Искал как это сделать и наткнулся на этот код:
Код:
var
LoginDialog: TLoginDialog;
Flags, TargetFrameName, PostData, Headers: OleVariant;
S: String;
...
with TLoginDialog.Create(Application) do 
try
if ShowModal = mrOk then 
begin
   S := Format('UserName=%s&Password=%s', [Edit1.Text, Edit2.Text]);
   PostData := VarArrayCreate([1, Length(S) + 1], varByte);
   System.Move(S[1], VarArrayLock(PostData)^, Length(S) + 1);
   VarArrayUnlock(PostData);
   Headers := 
     'Content-Type: application/x-www-form-urlencoded'#10#13;
   WebBrowser1.Navigate('http://intranetserver/secretpage', Flags,
     TargetFrameName, PostData, Headers);
end;
finally
Free;
end;
и ничего не понял...

Что за переменные Flags, TargetFrameName, Headers? И как формируется переменная PostData?
dacorp вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема с получением страницы lukinjj PHP 2 18.07.2010 21:03
Отправка POST Alex Cones Работа с сетью в Delphi 3 18.05.2010 11:07
Отправка картинки post Marsik Работа с сетью в Delphi 4 25.01.2010 13:03
Проблемы с получением страницы Kottik Работа с сетью в Delphi 15 18.09.2009 00:24
отправка POST CraZZy RabbIt Работа с сетью в Delphi 8 24.04.2009 16:48