|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Отправа POST запроса в форму
Помогите отправить правильно запрос, сделал пол программы, программа уже умеет получать картинку капчи, а вот отправлять обратно не могу научить. При отправке прога просто закрываеться и все...
сайт irk.ru/sms/ то что идет с браузера http://www.pictureshack.ru/images/6881123.JPG то что шлет прога http://www.pictureshack.ru/images/3585321.JPG Код HTML:
на форме есть кнопка "отправить", её нужно как то тоже нажать? |
#2
|
||||
|
||||
Код:
data.Add('_method POST'); // Эту строчку нах удали data.Add('irk='+Edit2.Text); // Названия и значения раздели не пробелами, а знаком = .... Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#3
|
||||
|
||||
На счет _method POST не соглашусь.
Могут возникнуть проблеммы с текстом смс: 1. Придется перегонять в Utf8. 2. Если текст имеет переход на новую строку тобишь #13#10. |
#4
|
||||
|
||||
data.Add('irk='+Edit2.Text);
Так тоже пробовал, не хочет и так работать, там же отчетливо видно на втором скрине что вообще не чего не посылает методом POST. |
#5
|
||||
|
||||
Код:
var Data: TStringList; Otvet: String; begin data:= TStringList.Create; try data.Add('_method=POST'); 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); //после code уберите пробел а то получается тег [CODЕ] data.Add('irk='+Edit2.Text); Otvet:=IdHTTP1.Post('http://www.irk.ru/sms/', data); //получили ответ и смотрим, что там написано finally data.Free; end; end; Последний раз редактировалось pesi, 24.07.2010 в 17:18. |
#6
|
||||
|
||||
ВСЕМ спс, проблема была чуть в другом, но = тоже на до было! С русским текстом скорее всего тоже будет проблема, по этому поводу позже отпишусь!
|
#7
|
||||
|
||||
data.Add('data[Sms][message]=peter888 русский текст');
русский текст вообще не как не приходит! |
#8
|
||||
|
||||
Код:
data.Add('data[Sms][message]='+AnsiToUtf8('peter888 русский текст')); |
#9
|
||||
|
||||
ОК все работает!
Вобщее это пока так текст вводиться, а по задумке текст из TMemo туда будет поподать. Чего то оно не хотит с TMemo работать, может есть что то удачнее, подскажие плиз....... Последний раз редактировалось hunt, 24.07.2010 в 18:34. |
#10
|
||||
|
||||
Приходит только первая строка?
|
#11
|
||||
|
||||
вообще не хочет посылать, а точнее я не знаю как это зделать хочется так
Код HTML:
Еще одна проблема, то ли сайт, то у меня прога, не дает повторно отправить тот же текст, нужно обязательно менять хотя бы один символ, а в значение результата строницы( Код HTML:
Последний раз редактировалось hunt, 24.07.2010 в 19:37. |
#12
|
||||
|
||||
Код:
data.Add('data[Sms][message]='+AnsiToUtf8(Memo1.Text)); Код:
data.Add('data[Sms][message]='+AnsiToUtf8(StringReplace(Memo1.Text, #13#10, '', [rfReplaceAll, rfIgnoreCase])); |
#13
|
||||
|
||||
у мемо нет свойства техт, там добавляеться по строкам в Lines(Tstring) это массив из строк получается.
Сделал так, data.Add('data[Sms][message]='+AnsiToUtf8(Edit3.Text)); Растянул эдит, можно сделать так что бы текст в эдите писался не в одну строчку, а переходил на следующюю. Но проблама того что повторно не отправляет тот же текст даже на другой номер не ушла, капчу естественно обнавляю. Последний раз редактировалось hunt, 25.07.2010 в 03:47. |
#14
|
||||
|
||||
Как это нет Memo1.Text, куда оно делось?
|
#15
|
||||
|
||||
Memo1.Lines.Text... *ROFL* *LOL*
Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |