[AmNeZiA]

Доброго времени суток.
Первый раз сталкиваюсь с данной проблемой.
Нужно отправить GET запрос с уже имеющимися куками.
Прошу помощи, знатоки!
Cookies:

[NumLock]

HTTP заголовок

Cookie: name=value

[AmNeZiA]

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

HTTP заголовок

Cookie: name=value

Будьте так добры дайте пожалуйста пример на отправку get запроса с cookies, а то я затупил.

[NumLock]

ну добавь свой заголовок в HttpSendRequest:

Код:

var
  hRequest: Pointer;
  addheader: String;
begin
...
  addheader:='Cookie: key=val';
  HttpSendRequest(hRequest,
    PChar(addheader), Length(addheader),
    nil, 0);
...

[AmNeZiA]

За готовое спасибо, но как добавить это все в заголовок?
Заранее, огромное спасибо!

[AmNeZiA]

Плюс ко всему:

Код:

addheader:='Cookie: key=val';

То есть получится примерно так:

Код:

addheader:='Cookie: cid=2E2722531D44; cidc=16d666160a0e196d5b9923bcb441adab; ...';

[NumLock]

так вот как на картинке нарисовано, так и добавляй. разделитель заголовков #13#10

[AmNeZiA]

Либо я чего то не понял, либо делаю не правильно.
Модули нужно какие подключать?
Delphi 7
Извиняй уж за напряги, но появляется две ошибки:

1. undeclared identifier: httpsendrequest
2. cookies не влазит в одну строчку. Уж больно огромны ~ 1837 символов.
Или же их нужно разбивать как они идут здесь?
Где должны быть разделители? - #13#10
После HttpSendRequest идет простой get запрос? memo1.lines.add:=idhttp.get('...');
Надеюсь на Вашу помощь.

[Alegun]

Слишком длинная строка, надо резать на куски

Код:

addheader:= addheader + 'fr1'  + 'fr2' + 'fr3' + 'fr4' + 'fr5';

[AmNeZiA]

Строку то я обрежу, что с ошибкой делать?

Код:

undeclared identifier: httpsendrequest

Я просто не догоняю вообще, мне нужен пример.
Достойный пример.

[Alegun]

Подключите модуль WinInet

[AmNeZiA]

Спасибо, с этим разгреб.
Но что делать с header?
Как это правильно оформить?
Я понял что должно соединяться через + #13#10 +
Это мой первый опыт в сфере cookies
На самом деле очень тяжело.

[Alegun]

Вроде надо так

Код:

... 
        addheader:='Accept: */*';
        HttpAddRequestHeaders(hRequest, Pointer(addheader), Length(addheader), HTTP_ADDREQ_FLAG_ADD);
        addheader:= 'Content-Type: application/x-www-form-urlencoded';
        HttpAddRequestHeaders(hRequest, Pointer(addheader), Length(addheader), HTTP_ADDREQ_FLAG_ADD);
        addheader:= 'Accept-Language: ru-ru,ru;q=0.8,en-us;q=0.5,en;q=0.3';
        HttpAddRequestHeaders(hRequest, Pointer(addheader), Length(addheader), HTTP_ADDREQ_FLAG_ADD);
        addheader:= 'Accept-Charset: windows-1251,utf-8;q=0.7,*;q=0.7';
        HttpAddRequestHeaders(hRequest, Pointer(addheader), Length(addheader), HTTP_ADDREQ_FLAG_ADD);
...

[AmNeZiA]

Судя по сему не осилю, пора заканчивать этот геморой.