[Delphi]/[Pascal] Задай вопрос, получи ответ

#11

20.01.2010, 20:16

bmp152

Новичок

Регистрация: 25.05.2009

Сообщений: 15

С нами: 8927727

Репутация: 6

Здравствуйте! Отправляю пост запрос в кодировке 'multipart/form-data'

Код:

http_client:=TIdHTTP.Create(nil);
multi:=Tidmultipartformdatastream.Create;
multi.AddFormField('post','0');
multi.AddFormField('postid','1');
multi.AddFormField('test','ТЕСТ');
и т.д.....
http_client.Post('http://url', multi);

через браузер выходит так:

Код:

------------rASF3sX2nnE7XYVfFHAkCK
Content-Disposition: form-data; name="post"

0

------------rASF3sX2nnE7XYVfFHAkCK
Content-Disposition: form-data; name="postid"

1

------------rASF3sX2nnE7XYVfFHAkCK
Content-Disposition: form-data; name="test"

ТЕСТ

и т.д.

через прогу:

Код:

----------012010185513125
Content-Disposition: form-data; name="post"
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable

0

----------012010185513125
Content-Disposition: form-data; name="postid"
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable

1

----------012010185513125
Content-Disposition: form-data; name="test"
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable

???.????

и т.д.

Подскажите пожалуйста как убрать строки "Content-Type: text/plain" и "Content-Transfer-Encoding: quoted-printable"? Как поменять "----------012010185513125" на "------------rASF3sX2nnE7XYVfFHAkCK" и как сделать чтоб вместо знаков вопросов была нормальная кодировка?