| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Отправа POST запроса в форму [D7, WinXP]

Страницы:   < 1 2 >

hunt ©   (2010-07-21 15:20:00) 

Помогите отправить правильно запрос, сделал пол программы, программа уже умеет получать картинку капчи, а вот отправлять обратно не могу научить. При отправке прога просто закрываеться и все...
сайт
irk.ru/sms/


procedure TForm1.Button1Click(Sender: TObject);
var
data:TStringList;
begin
  data.Add('_method=POST');
  data.Add('data[_name]=Sms');
  data.Add('data[Sms][number]=#номер телефона#');
  data.Add('data[Sms][massage]=peter888 русский текст');
  data.Add('data[Sms][code]='+edit1.Text);
  IdHTTP1.Post(' http://www.irk.ru/sms/', data);
end;


---

brother   (2010-07-22 10:45:00) [21]

data:= TStringList.Create;
try
 data.Add('_method=POST');
 data.Add('data[_name]=Sms');
 data.Add('data[Sms][number]=89500500098');
 data.Add('data[Sms][massage]=peter888 русский текст');
 data.Add('data[Sms][code]='+edit1.Text);
 IdHTTP1.Post(' http://www.irk.ru/sms/', data);
finally
 data.Free;
end;

---

brother   (2010-07-22 10:42:00) [22]

> http://www.irk.ru/sms/

как интересно... Иркутянин? стучись в асю...

---

hunt   (2010-07-22 10:25:00) [23]

procedure TForm1.Button1Click(Sender: TObject);
var
data:TStringList;
begin
  data.Create;
  data.Add('_method=POST');
  data.Add('data[_name]=Sms');
  data.Add('data[Sms][number]=89500500098');
  data.Add('data[Sms][massage]=peter888 русский текст');
  data.Add('data[Sms][code]='+edit1.Text);
  IdHTTP1.Post(' http://www.irk.ru/sms/', data);
Создал, дело в том что прога просто закрываеться, а когда кампилишь не каких ошибок не выдает, в делфи говорит
http://www.pictureshack.ru/images/5517sms.JPG

---

Медвежонок Пятачок   (2010-07-21 17:35:00) [24]

дату-то сначала неплохо бы и создать.

---

Anatoly Podgoretsky   (2010-07-21 15:51:00) [25]

> hunt  (21.07.2010 15:20:00)  [0]

ModalResult := mrNone

---

Страницы:   < 1 2 >

Наверх