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

Delphi Sources



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

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 03.07.2011, 12:30
Аватар для T-dayne
T-dayne T-dayne вне форума
Начинающий
 
Регистрация: 26.01.2010
Сообщения: 180
Репутация: 31
Восклицание Отправка post, дополнительные данные

Итак, сниффер пишет что серверу уходит Post Data:

Код:
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="addtype"

main
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="name"

имя
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="phone"

+79054879874
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="email"

maxx21@mail.ru
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="icq"

458799545
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="title"

заголовок здесь
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="text"

текст
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="price"

100
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="curr"

1
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="rub"

247
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="rub_select"

249
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="typ"

1
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="period"

5
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="comm"

1
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="userfile[]"; filename=""


------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="userfile[]"; filename=""


------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="userfile[]"; filename=""


------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="userfile[]"; filename=""


------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="code"

753905
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="rights"

1
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="subm"

Отправить
------------wH0BwlHl6uMehTAugbJwng--

А вот и RAW Stream(это, походу весь запрос полностью):

Код:
POST /add.php HTTP/1.1
User-Agent: Opera/9.80 (Windows NT 5.1; U; ru) Presto/2.9.168 Version/11.50
Host: bazarpnz.ru
Accept: text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/webp, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1
Accept-Language: ru-RU,ru;q=0.9,en;q=0.8
Accept-Encoding: gzip, deflate
Referer: http://bazarpnz.ru/add.php?main
Cookie: user=513e60ab4380f2c67e9cadfb8e6f9d11; _wau_r=1; __utmz=86553483.1309625616.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); PHPSESSID=c672fcd23f975ae9a5028000e5d4757c; pnz=1; __utma=86553483.1083050481.1309625616.1309678912.1309681056.6; __utmc=86553483; __utmb=86553483.1.10.1309681056
Connection: Keep-Alive
Content-Length: 1992
Content-Type: multipart/form-data; boundary=----------wH0BwlHl6uMehTAugbJwng

------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="addtype"

main
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="name"

имя
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="phone"

+79054879874
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="email"

maxx21@mail.ru
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="icq"

458799545
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="title"

заголовок здесь
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="text"

текст
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="price"

100
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="curr"

1
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="rub"

247
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="rub_select"

249
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="typ"

1
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="period"

5
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="comm"

1
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="userfile[]"; filename=""


------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="userfile[]"; filename=""


------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="userfile[]"; filename=""


------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="userfile[]"; filename=""


------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="code"

753905
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="rights"

1
------------wH0BwlHl6uMehTAugbJwng
Content-Disposition: form-data; name="subm"

Отправить
------------wH0BwlHl6uMehTAugbJwng--

Цитата:
------------wH0BwlHl6uMehTAugbJwng--
здесь в качесвте разделителя, видимо


Так вот. Помогите пожалуйста отправить точно такой-же запрос но через idhttp1.post.

Делаю так:

Код:
data.Add('addtype=main');
data.Add('name=Алексей');
data.Add('phone=89058657895');
data.Add('email=maxxer5454@mail.ru');
data.Add('icq=54578429');
data.Add('title=Продам авто! Риальне!');
data.Add('text=текст объявлениятекст объявления');
data.Add('price=100000');
data.Add('curr=1');
data.Add('rub=247');
data.Add('rub_select=249');
data.Add('typ=1');
data.Add('period=5');
data.Add('comm=1');
data.Add('userfile[]=');
data.Add('userfile[]=');
data.Add('userfile[]=');
data.Add('userfile[]=');
data.Add('code=45879');
data.Add('rights=1');
data.Add('subm=отправить');

Но почему-то отправляется на в русской кодировке, и через разделитель & вместо пробелов и перенососв строки
idhttp.request настроен
Ответить с цитированием
  #2  
Старый 03.07.2011, 14:54
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Код:
uses
  IdMultipartFormData, IdHTTP,

var
  AIdMultiPartFormDataStream: TIdMultiPartFormDataStream;
begin
  AIdMultiPartFormDataStream:=TIdMultiPartFormDataStream.Create;
  try
    AIdMultiPartFormDataStream.AddFormField('addtype', 'main'');
    AIdMultiPartFormDataStream.AddFormField('name', 'Алексей');
    AIdMultiPartFormDataStream.AddFormField('***', '***');
    AIdMultiPartFormDataStream.AddFormField('***', '***');
    AIdMultiPartFormDataStream.AddFormField('***', '***');
    // ..
    IdHTTP1.Post('http://server.domain', AIdMultiPartFormDataStream);
  finally
    AIdMultiPartFormDataStream.Free;
  end;
end;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Ответ


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

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