LibCurl: Серия запросов

Модератор: Дед Пахом

Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
Ответить
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7377
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

LibCurl: Серия запросов

Сообщение Игорь Столяров »

Привет всем !

Не получается, выполнить серию однотипных запросов (в запросе меняется только номер пакета).
В цикле почему-то всегда выполняется первый запрос. По одному запросы прекрасно выполняются ... :(

Код: Выделить всё

  Curl &= New TCurlClass
  Сurl.Init()
  
  Loop ...  
    Curl.FreeHttpHeaders()
    Curl.AddHttpHeader('Host: api-seller.ozon.ru')
    ...
    Curl.SetHttpHeaders()

    Curl.SendRequest(...)
    
    !curl.CleanUp()  Не решает проблему
    !curl.Init()  
  end   
  
  Dispose(Curl)
Я как-то неправильно формирую последовательность запросов ? Спасибо ! :)
За теми кто отстал - не возвращаться. (С) Кодекс
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3133
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

LibCurl: Серия запросов

Сообщение Дед Пахом »

Воспроизводится, выложу фикс попозже сегодня.
С уважением, ДП
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3133
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

LibCurl: Серия запросов

Сообщение Дед Пахом »

Выложил v1.61, должно работать.
Я бы в конце цикла вызывал curl.Reset() (вместо CleanUp+Init).
С уважением, ДП
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7377
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

LibCurl: Серия запросов

Сообщение Игорь Столяров »

Спасибо ! :)
За теми кто отстал - не возвращаться. (С) Кодекс
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3133
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

LibCurl: Серия запросов

Сообщение Дед Пахом »

А если какие-то параметры устанавливаются ДО цикла, то Reset вызывать не надо, он их сбросит в дефолтные.
С уважением, ДП
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7377
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

LibCurl: Серия запросов

Сообщение Игорь Столяров »

ДД !
Всё проверил - проблем нет, ещё раз спасибо ! :)
Теперь работает даже вот такая оптимистическая комбинация для пакетной загрузки:

Код: Выделить всё

  Curl &= New TCurlClass
  Сurl.Init()

  Curl.FreeHttpHeaders()
  Curl.AddHttpHeader('Host: api-seller.ozon.ru')
  ...
  Curl.SetHttpHeaders()
  
  Loop ...  
    Curl.SendRequest(...)
  end
  
  Dispose(Curl)
P/S: Но про Сurl.Reset() - я услышал и записал для себя ... 8)
За теми кто отстал - не возвращаться. (С) Кодекс
Ответить