
04.05.2010, 09:03
|
|
Участник форума
Регистрация: 23.07.2009
Сообщений: 261
С нами:
8843557
Репутация:
539
|
|
Сообщение от stepashka_
Парсю капчу ВК, но она не сохраняется... что не так?
Вот писал давно уже код... но там я юзал регулярку.
PHP код:
if Pos('captcha_sid', result) <> 0 then
begin
RegExp.Expression := '"captcha_sid":"(.+?)","';
RegExp.Exec(result);
captcha_sid := RegExp.Match[1];
//showmessage(captcha_sid);
fr.log.Lines.Add('-Получение капчи');
(* Грузим капчу *)
fr.http.Get('http://vkontakte.ru/captcha.php?sid=' + captcha_sid, ms);
ms.SaveToFile('captcha_temp.jpeg');
fr.image1.Picture.LoadFromFile('captcha_temp.jpeg');
InputQuery('Капча','Введи капчу.',captcha_key);
end;
|
|
|