Достать капчу [Delphi]

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by fuckyoupig, 22 Mar 2011.

  1. fuckyoupig

    fuckyoupig Member

    Joined:
    1 Mar 2011
    Messages:
    0
    Likes Received:
    11
    Reputations:
    2
    Всем привет. Возникла проблема с тем как достать капчу со страницы регистрации сайта diary.ru. Вроде бы всё просто, но есть одно но. При сохранении капчи сохраняется совсем другая капча. В исходном коде линк на другую картинку.

    Вот кусок кода. Ничего особенного, просто сохранение картики.

    Code:
    var
    link:string;
    begin
      f := TMemoryStream.create;
      result:=form1.IdHTTP1.Get('http://www.diary.ru/registration/register/?open_uri=') ;
      memo1.Text:=result;
      link:= Pars('<br /><br /><img src="', result, '"');
      form1.idhttp1.Get('http://www.diary.ru'+link, f);
      f.SaveToFile('image.gif');
      form1.RxGIFAnimator1.Image.LoadFromFile('image.gif');
      f.Free;
    end;
    В чём проблема может быть?
     
  2. AlexTheC0d3r

    AlexTheC0d3r Elder - Старейшина

    Joined:
    25 Jul 2008
    Messages:
    388
    Likes Received:
    179
    Reputations:
    18
    в том, что она генерируется динамически.
    и того, что ты описал не может быть!
     
  3. fuckyoupig

    fuckyoupig Member

    Joined:
    1 Mar 2011
    Messages:
    0
    Likes Received:
    11
    Reputations:
    2
    Как сделать чтобы было нормально?
     
  4. BigSnake

    BigSnake New Member

    Joined:
    20 Apr 2010
    Messages:
    15
    Likes Received:
    1
    Reputations:
    0
    после первого запроса получается кук , который надо передавать со вторым запросом

    используй TIdCookieManager
     
  5. zannussi

    zannussi Elder - Старейшина

    Joined:
    22 May 2008
    Messages:
    4
    Likes Received:
    18
    Reputations:
    2
    Сперва начал писать, что мол, когда ты пытаешься сохранить капчу, сервер думает, что ты обновляешь ее, и подсовывает другую.
    Но проверил... не так, вся проблема в куки
     
  6. fuckyoupig

    fuckyoupig Member

    Joined:
    1 Mar 2011
    Messages:
    0
    Likes Received:
    11
    Reputations:
    2
    BigSnake
    Спасибо огромное