Socket Already in Use (error 10048)

[spirit-ua]

Всем Привет!

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

С помощью IdHTTP (Delphi 7 с родной Indy) шлю POST-запросы (обновление записи) на веб-сервер IdHTTP.Port=80 (без указания порта тоже пробовал одинаково).
Все вроде бы работает нормально, запрос/ответ, запрос/ответ.

Попробовал потестировать надежность, зарядил в цикл подряд 100 запросов - отлично отработало.

Зарядил 1 000 вылетаю примерно на 880-й итерации (Socket Error 10048 Socket Already in Use)

Ставил sleep - результат тот же

возможно код неграмотный

   for i:=1 to rec_count do
     begin
       try
         HTTP_ASD := TidHTTP.Create(nil);
         HTTP_ASD.REQUEST;

         HTTP_Res := ''; POST_Info.Clear;

         POST_Info.Add('command=RECORD_UPDATE');
         POST_Info.Add('record_number=' + IntToStr(i));
         ... // + еще около 30 переменных
         HTTP_Res := HTTP_ASD.Post(HOST_Main + HOST_File, POST_Info);
         finally
           sRichEdit1.Lines.Add(HTTP_Res);
           sProgressBar1.Position := sProgressBar1.Position + 1;
           HTTP_ASD.Free;
         end;
     end;

В таблице необходимо обновить около 2 000 записей (по 30 полей), отсюда столько запосов.

Можно ли отправить одним POST запросом "все" переменные (2.000*30=60.000) чтоб не использовать цикл?

Подскажите где что поправить и привести код в "правельный"

[spirit-ua]

а что никто не подскажет?

[-=Virus=-]

Отправляй частями.

[spirit-ua]

Сообщение от -=Virus=-

Отправляй частями.

это как? делать "передышку" (sleep) между блоком итераций или паковать в более "жирные" пакеты по N записей в оном запросе?

[Stilet]

Я не пойму зачем в цикле создавать каждый раз объект TidHTTP...
Смысл? Вынеси его за пределы цикла

[spirit-ua]

Сообщение от Stilet

Я не пойму зачем в цикле создавать каждый раз объект TidHTTP...
Смысл? Вынеси его за пределы цикла

Само собой, уже вынес, но ошибка осталась... как победить?

[Человек_Борща]

использовать GET метод вместо POST, или иной механизм ожидания(TEvent из SyncObjs к примеру) получения ответа.

POST метод - асинхронный, потому HTTP не ждет данных и цикл бежит дальше, вследствии чего нарывается на ошибку.

[spirit-ua]

Сообщение от Человек_Борща

использовать GET метод вместо POST, или иной механизм ожидания(TEvent из SyncObjs к примеру) получения ответа.

POST метод - асинхронный, потому HTTP не ждет данных и цикл бежит дальше, вследствии чего нарывается на ошибку.

А GET позволит передать строку (переменную) свыше 255 символов и вообще есть ли ограничения на значение длины переменной, строки и кол-во переменных?

[Пепел Феникса]

Сообщение от Человек_Борща

использовать GET метод вместо POST, или иной механизм ожидания(TEvent из SyncObjs к примеру) получения ответа.

POST метод - асинхронный, потому HTTP не ждет данных и цикл бежит дальше, вследствии чего нарывается на ошибку.

как давно пост асинхронным стал?

[Человек_Борща]

как давно пост асинхронным стал?

GET - запрос с ожиданием ответа
POST - запрос без ожиданияответа
нет? Вроде так всегда было...