Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Интернет и сети
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 18.02.2011, 12:10
keeper.ok keeper.ok вне форума
Прохожий
 
Регистрация: 18.02.2011
Сообщения: 3
Репутация: 10
По умолчанию Пост запрос на скрипт <form action>

Решил написать программу для передачи данных в скрипт на веб-сервере.
Помогите исправить код, прога не пашет, уже час сижу...
Отдельно написал для запроса капчи, всё получилось, а вот с этим проблемы((

Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls, IdAntiFreezeBase, IdAntiFreeze,
  IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdHTTP, pngimage;

type
  Tname = class(TForm)
    IdHTTP1: TIdHTTP;
    IdAntiFreeze1: TIdAntiFreeze;
    name: TEdit;
    tel: TEdit;
    Button1: TButton;
    Memo1: TMemo;
    Memo2: TMemo;

    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  name: Tname;

implementation

{$R *.dfm}

procedure Tname.Button1Click(Sender: TObject);
var
PostData:TStringList;
begin
try
PostData:=TStringList.Create;
PostData.Add('name=keeper');
PostData.Add('tel=8800000000');
IdHTTP1.Post('http://zverteam.ru/php/update.php',PostData);

    Memo1.Text:=IdHTTP1.Post('http://zverteam.ru/php/update.php', PostData);

  finally

PostData.Free;
end;
end;

end.

Вообще никаких реакций на нажатие кнопки.
Ссылки рабочие, сама форма находится по адресу _http://zverteam.ru/php

Последний раз редактировалось keeper.ok, 18.02.2011 в 12:13.
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 20:49.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025