полу авт голосование

[shellmd5]

Решил написать программкудля полу авт голосования на l2top (для своего развития а не для накрутки тк на l2 давно забил)
Но столкнулся с проблемай с куками)
запрос страницы сделать не составило труда

pref:=Ed2.text;
nam:=Ed1.text;
List:=IdHTTP1.Get('http://l2top.ru/vote/'+nam+'/?prefix='+pref);
//Получили текст страници в List.text
ListFIN:='/getimg.php?';//поиск капчи по тексту
 k:=pos(ListFIN,List)+length(ListFIN);
  while List[k] <>'''' do
   begin
    link:=link+List[k];
    k:=k+1;
   end;
link:='http://l2top.ru/getimg.php?'+link;//нашли
Stream:=TMemoryStream.Create;
 IdHTTP1.Get(link,Stream); //грузим капчу в поток.
 Stream.Position:=0;
 JPEG:=TJPEGImage.Create;   //создаем jpeg
 JPEG.LoadFromStream(Stream);
 Image1.Picture.Assign(JPEG);//выводим в Image

Как я понил там проверка куков идет ток я не могу понять она идет на уровне запроса или на уровне отсылки тк если проголосовать и попытатся еще раз (сменив IP) то выдает что голосовали (а в куках появляется записи (появляэтся сразу после голосования))

отсылку я организовал так)

Stream:=TMemoryStream.Create;
ParamList:=TStringList.Create;
 ParamList.Add('referer=%3F');
 ParamList.Add('sec_referer=4b30c013d9042c579ca3f67b0980132c0568ae8b');
 ParamList.Add('voteOk=ok');
 ParamList.Add('c0c36f5a='+Captcha.Text);
 ParamList.Add('name='+Nik.Text);
 ParamList.Add('prefID=1345');
 ParamList.Add('');
{with IdHTTP1.Request do
 begin
  URL:='http://l2top.ru/vote/'+nam+'/';
  Host:='l2top.ru';
  UserAgent:='Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.1.1) Gecko/20090715 Firefox/3.5.1 (.NET CLR 3.5.30729)';
  Accept:='text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8';
  AcceptLanguage:='ru,en-us;q=0.7,en;q=0.3';
  AcceptEncoding:='gzip,deflate';
  AcceptCharset:='windows-1251,utf-8;q=0.7,*;q=0.7';
  Connection:='keep-alive';
  Referer:='http://l2top.ru/vote/'+nam+'/?prefix='+pref;
в отсылке pos есть еще вот это
//  Cookies:='__utmz=173254270.1260338083.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); __utma=173254270.1630098338.1260338083.1260348375.1260348458.4; l2x=c45bbd546b7fb9710ef4834ce3cb8f61d8d167c3; amm=1';
  ContentLength:=Length(ParamList.Text);
  ContentType:='application/x-www-form-urlencoded';
 end;}
IdHTTP1.Post('http://l2top.ru/vote/3118/',ParamList,Stream);
//поидее если я понимаю то в стреам будит находится ответ
Stream.SaveToFile('C:\1.html');

Помогите разобратся как реализовать передачу кукис и если есть что не правильное подскажите

[AquaKlaster]

IdCookieManager подключи к IdHTTP
И куки будут приниматся и отправлятся автоматически

[Voody]

Думаю это идея выгорит. Ибо тоже просили сделать автоголосовалку для этого сервиса. В общем-то сделал, но там голос засчитывается только после второго голосования. Т.е. надо делать запрос на голосование, потом сохранять выданные куки и только через сутки можно с этими куками проголосовать, чтобы голос засчитали. Следовательно эти куки надо хранить, а потом записывать и голосовать. Геморрой короче. Еще если прокси прикручивать для накрутки.
P.S. думаю, что для "своего развития" слишком неподходящий вариант

[Квэнди]

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

[shellmd5]

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

P.S. думаю, что для "своего развития" слишком неподходящий вариант

Ну попытатся надо было же)

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

яж не чего не нарушал и не просил что либо сломать а только подсказать как осуществить передачу куков)
а если я всеже напишу программку то в паблик она не пойдет тк играть надо чесно.

Потеме завтра напишу что получилось)

[Usov]

IdHTTP.Request.CustomHeaders.Clear;
IdHTTP.Request.CustomHeaders.Add('Cookie: eewfwefwefwefwefwef');

[shellmd5]

Нашел уже готовую программу для голосования проснифил траф вот что получилось

GET /vote/(Номар)/?prefix=() HTTP/1.1
Accept-Encoding: 
Host: l2top.ru
Cookie: l2top_cookie=MTI2MDxzNjg5NjAxMTY5MzUyMDc5MTcwMDA4NTIyMzE2MzcwMTEyNjY5Mjk4NDg3MTE2NjY1YjU4ZTFjMjBkMjYyZTMxOGEyOGViNTA3YmVhYTk3MzFlNDI%3D
Connection: Keep-Alive

на это серв ответил вот так)

HTTP/1.1 200 OK
Server: nginx
Date: Wed, 16 Dec 2009 08:57:47 GMT
Content-Type: text/html
Transfer-Encoding: chunked
Connection: keep-alive
Keep-Alive: timeout=20
Set-Cookie: l2x=d521558ef399d31f03b1d17405fe83eca87e5235; path=/; domain=l2top.ru; HttpOnly
Expires: Thu, 19 Nov 1981 08:52:00 GMT
Cache-Control: no-store, no-cache, must-revalidate, post-check=0, pre-check=0
Pragma: no-cache
Set-Cookie: amm=1; expires=Wed, 16-Dec-2009 20:57:47 GMT; path=/; domain=l2top.ru

5460
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<head>
        <title>L2TOP.ru (binary data)

терь программа запросила капчу

GET /getimg.php?1164511465 HTTP/1.1
Host: l2top.ru
Cookie: l2top_cookie=MTI2MDxzNjg5NjAxMTY5MzUyMDc5MTcwMDA4NTIyMzE2MzcwMTEyNjY5Mjk4NDg3MTE2NjY1YjU4ZTFjMjBkMjYyZTMxOGEyOGViNTA3YmVhYTk3MzFlNDI%3D; l2x=d521558ef399d31f03b1d17405fe83eca87e5235

и в ответ на это получил

HTTP/1.1 200 OK
Server: nginx
Date: Wed, 16 Dec 2009 08:57:49 GMT
Content-Type: image/jpeg
Connection: keep-alive
Keep-Alive: timeout=20
Cache-Control: no-store, no-cache, must-revalidate, post-check=0, pre-check=0
Pragma: no-cache
Expires: Thu, 19 Nov 1981 08:52:00 GMT
Content-Length: 2592

мояже программа все это пытается делать настолько коряво что я хз
Сижу правлю смотрю что я намудрил

Так же и не допедрил как в этой программе передаются куки