PHP DM Gate v0.9 » Отправа POST запроса в форму <span class="vd">[D7, WinXP]</span>

hunt (21.07.10 15:20) [0]

Помогите отправить правильно запрос, сделал пол программы, программа уже умеет получать картинку капчи, а вот отправлять обратно не могу научить. При отправке прога просто закрываеться и все...
сайт
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;

<Цитата>
Anatoly Podgoretsky © (21.07.10 15:51) [1]

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

ModalResult := mrNone

<Цитата>
Медвежонок Пятачок © (21.07.10 17:35) [2]

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

<Цитата>
hunt (22.07.10 10:25) [3]

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

<Цитата>
brother © (22.07.10 10:42) [4]

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

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

<Цитата>
brother © (22.07.10 10:45) [5]

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;

<Цитата>
Плохиш © (22.07.10 10:45) [6]

> hunt (22.07.10 10:25) [3]
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> data:TStringList;
> begin
> data.Create;

Это, что за испражнение?

<Цитата>
Anatoly Podgoretsky © (22.07.10 12:25) [7]

> Плохиш (22.07.2010 10:45:06) [6]

Это вызов Метода объекта, а ты намекаешь на конструктор.

<Цитата>
hunt (22.07.10 17:49) [8]

спс, помогло, не работал раньше с TStringList

<Цитата>
hunt (22.07.10 18:09) [9]

еще один вопросик не по теме,
строка имеет значения типа
299450,4266024,fd958d0c30878e1cc47322eb18d935ea

нужно что бы строка стала
fd958d0c30878e1cc47322eb18d935ea
как это можно сделать?

символы меняются, но 2 запятые есть обязательно, после 2ой запятой нужное значение.

<Цитата>
Anatoly Podgoretsky © (22.07.10 18:52) [10]

> hunt (22.07.2010 18:09:09) [9]

Ну удали все символы сначала до второй запятой включительно

<Цитата>
Плохиш © (22.07.10 22:33) [11]

> Anatoly Podgoretsky © (22.07.10 18:52) [10]

Ты не умничай, ты код давай, а то он не работал и с этим никогда.

<Цитата>
hunt (23.07.10 02:21) [12]

А все равно , не хочет работать. смс не приходят, хотя запрос оправляю такой же как с браузера.

з.ы.
delete(s,1,15);

<Цитата>
stas © (23.07.10 16:52) [13]

hunt (23.07.10 02:21) [12]
На это может быть куча причин.
Установи HTTPAnalyzer и посмотри пакеты какие шлет браузер и какие у тебя уходят.

<Цитата>
Медвежонок Пятачок © (23.07.10 16:54) [14]

хотя запрос оправляю такой же как с браузера.

тебе это только кажется

<Цитата>
hunt © (23.07.10 18:44) [15]

я и так пользуюсь HTTPAnalyzer, действительно post не посылает то что нужно
то что идет с браузера
http://www.pictureshack.ru/images/6881123.JPG
то что шлет прога
http://www.pictureshack.ru/images/3585321.JPG

procedure TForm1.Button1Click(Sender: TObject);
var
data:TStringList;
begin
data:= TStringList.Create;
try
data.Add('_method POST');
data.Add('irk '+Edit2.Text);
data.Add('data[_name] Sms');
data.Add('data[Sms][number] '+ComboBox1.Text);
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;
end;

что не так?
на форме есть кнопка "отправить", её нужно как то тоже нажать?

<Цитата>
Медвежонок Пятачок © (23.07.10 19:13) [16]

1. пост-блок инвалидный. имена полей не отделены от их значений.
2. судя по картинке №2 работать не будет даже если пофиксить п.1 ибо твоя версия инди неправильно делает пост из стринглиста.
3. если пофиксить пп.1,2 , то работать все равно не будет. ибо там капча.

<Цитата>
Медвежонок Пятачок © (23.07.10 19:16) [17]

Идея конечно планетарного масштаба. Я бы даже сказал галактического масштаба идея:

data.Add('data[Sms][code]='+edit1.Text);

сначала в чем-то рендерим страницу что бы увидеть капчу, затем запускаем чудо программу SmsMasseger.exe, вводим текст, капчу номер телефона и засылаем

<Цитата>
hunt © (24.07.10 03:02) [18]

Идея получения капчи, вообще грандиозная, и она работает! дело в том что запрос не отправляется, даже при том что не чем
> имена полей не отделены от их значений.

все равно хоть какой то POST должен уходить а там вообще пусто ранще было через "=" и все равно не работало. других предложений нет кроме
> ибо твоя версия инди неправильно делает пост из стринглиста.

<Цитата>
hunt © (24.07.10 03:19) [19]

Может можно как то с помощью TWebBrowser-a запрос отправить?

<Цитата>
Anatoly Podgoretsky © (24.07.10 09:03) [20]

Может можно как то с помощью программиста запрос отправить?

<Цитата>
Virgo_Style © (24.07.10 12:08) [21]

>[massage]

:-)

<Цитата>
hunt © (24.07.10 17:06) [22]

> Anatoly Podgoretsky © (24.07.10 09:03) [20]
> Может можно как то с помощью программиста запрос отправить?
>

смотрю тут тролей и флудирастов куча.... у тебя если мыслей нет то и писать не стоит, а "срать" иди в туалет.

<Цитата>
hunt © (24.07.10 17:12) [23]

> Virgo_Style © (24.07.10 12:08) [21]
> >[massage]:-)

Спс проблема была в этом!

<Цитата>
hunt © (24.07.10 18:12) [24]

смс приходят, но только на латинице, русские букавки не доходят вообще так как будто их там и не писали.

<Цитата>
hunt © (24.07.10 19:39) [25]

с латиницей разобрался AnsiToUtf8

<Цитата>