powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / libcurl
25 сообщений из 89, страница 3 из 4
libcurl
    #39720881
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
X11А браузер нормально отправляет?
Браузер отправляет нормально. XML в UTF-8.

IdHttp1.Request.ContentType := 'application/xml';
IdHttp1.Request.ContentType := 'text/xml'; - пробовал разные, опять ошибка.
...
Рейтинг: 0 / 0
libcurl
    #39720886
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GallemarБраузер отправляет нормально.

вот перед отправкой жмякай F12, вкладка СЕТЬ:
и далее сравнивай параметры
http://prntscr.com/l8ycan
...
Рейтинг: 0 / 0
libcurl
    #39720887
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey, и так 500.
...
Рейтинг: 0 / 0
libcurl
    #39720897
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
X11GallemarБраузер отправляет нормально.

вот перед отправкой жмякай F12, вкладка СЕТЬ:
и далее сравнивай параметры
http://prntscr.com/l8ycan
Это FF?
...
Рейтинг: 0 / 0
libcurl
    #39720902
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
libcurl
    #39720929
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
поправил свойства, всё равно ошибка 500.
...
Рейтинг: 0 / 0
libcurl
    #39720937
Фотография X11
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GallemarЭто FF?

у меня - да.

Ну потом щёлкай по самой строке запроса
http://prntscr.com/l8zce9

остальное смотри
...
Рейтинг: 0 / 0
libcurl
    #39720945
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Gallemarи так 500
А мультипарт вариантом?
...
Рейтинг: 0 / 0
libcurl
    #39720946
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GallemarБраузер отправляет нормально. XML в UTF-8.
Хм... Тут "INN", а у тебя в примере "ИНН". Это нормально?
...
Рейтинг: 0 / 0
libcurl
    #39720947
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev AlexeyGallemarБраузер отправляет нормально. XML в UTF-8.
Хм... Тут "INN", а у тебя в примере "ИНН". Это нормально?
специально поменял на латиницу
...
Рейтинг: 0 / 0
libcurl
    #39720952
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev AlexeyGallemarи так 500
А мультипарт вариантом?
нет
...
Рейтинг: 0 / 0
libcurl
    #39720961
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
500 же точно не может быть с сетью связана? А то я по vpn подключен к сети с утм
...
Рейтинг: 0 / 0
libcurl
    #39720968
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
rgreatCobalt747,

Если XML надо не получать а передавать я бы посоветовал вместо TXMLDocument (и т.п.) сгенерить текст XML вручную.
Быстрее будет.
Не катит, всё равно ошибка 500. ХЗ что ему не так.
...
Рейтинг: 0 / 0
libcurl
    #39720972
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Gallemar500 же точно не может быть с сетью связана?
500 в HTTP это внутренняя ошибка сервера. Покажи тело ответа.
...
Рейтинг: 0 / 0
libcurl
    #39720975
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev AlexeyGallemar500 же точно не может быть с сетью связана?
500 в HTTP это внутренняя ошибка сервера. Покажи тело ответа.
Не могу.
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
var
 http : TIdHttp;
 req  : TIdMultiPartFormDataStream;
 data : TStream;
 Response: TStringStream;
begin
http := TIdHTTP.Create(nil);
data := TBytesStream.Create(TEncoding.Utf8.GetBytes(body));
req := TIdMultiPartFormDataStream.Create;
req.AddFormField('xml_file', 'text/xml', 'utf-8', data, 'client.xml');
http.Post('http://10.10.1.233:8080/opt/in/QueryPartner', req,Response);
Showmessage(Response.DataString);


Вылетает на отправке и всё, ничего не возвращает.
...
Рейтинг: 0 / 0
libcurl
    #39720993
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GallemarВылетает на отправке и всё, ничего не возвращает.
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
    resp := TStringStream.Create;
    try

     http.Post('http://10.10.1.233:8080/opt/in/QueryPartner', req, resp);

    finally

     writeLn(resp.DataString);
     resp.Free;

    end;


Что покажет?
...
Рейтинг: 0 / 0
libcurl
    #39721003
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev AlexeyGallemarВылетает на отправке и всё, ничего не возвращает.
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
    resp := TStringStream.Create;
    try

     http.Post('http://10.10.1.233:8080/opt/in/QueryPartner', req, resp);

    finally

     writeLn(resp.DataString);
     resp.Free;

    end;


Что покажет?
Ничего
На resp.Free; ошибку i/o выдает и всё
...
Рейтинг: 0 / 0
libcurl
    #39721009
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GallemarНичего
А http.Response.ResponseText?
...
Рейтинг: 0 / 0
libcurl
    #39721067
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey,
---------------------------
Project1
---------------------------
I/O error 105.
---------------------------
ОК
---------------------------
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
var
 http : TIdHttp;
 req  : TIdMultiPartFormDataStream;
 data : TStream;
 resp: TStringStream;
begin
http := TIdHTTP.Create(nil);
data := TBytesStream.Create(TEncoding.Utf8.GetBytes(body));
req := TIdMultiPartFormDataStream.Create;
req.AddFormField('xml_file', 'text/xml', 'utf-8', data, 'client.xml');
    resp := TStringStream.Create;
    try
     http.Post('http://10.10.1.233:8080/opt/in/QueryPartner', req, resp);
    finally
    writeLn(http.Response.ResponseText);
    writeLn(resp.DataString);
    resp.Free;
    end;


...
Рейтинг: 0 / 0
libcurl
    #39721071
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Gallemar,

Для работы writeln прилага должна быть консольной. Если у тебя c гуем -- замени writeln на ShowMessage.
...
Рейтинг: 0 / 0
libcurl
    #39721086
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev AlexeyGallemar,

Для работы writeln прилага должна быть консольной. Если у тебя c гуем -- замени writeln на ShowMessage.
Заменял, просто пустое окно.
...
Рейтинг: 0 / 0
libcurl
    #39721091
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вернее так :
ShowMessage(http.Response.ResponseText); - ошибка 500
ShowMessage(resp.DataString + 'ашипка'); - пустое окно
...
Рейтинг: 0 / 0
libcurl
    #39721093
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GallemarЗаменял, просто пустое окно
Тогда ставь реверс-прокси (fiddler или charles) и анализируй трафик.
...
Рейтинг: 0 / 0
libcurl
    #39721098
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev Alexey, а может проще изначальный вопрос решить 21710079
...
Рейтинг: 0 / 0
libcurl
    #39721105
Фотография Gallemar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kazantsev AlexeyGallemarЗаменял, просто пустое окно
Тогда ставь реверс-прокси (fiddler или charles) и анализируй трафик.
fiddler не видит коннекты, может я что не так делаю?
...
Рейтинг: 0 / 0
25 сообщений из 89, страница 3 из 4
Форумы / Delphi [игнор отключен] [закрыт для гостей] / libcurl
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]