Немогу получить код страницы!!!

var
s, c, remixchk, remixsid: string;
i: Integer;
http: TIdHTTP;
begin
http := TIdHTTP.Create;

http.AllowCookies := True;
http.HandleRedirects := True;
http.Request.Host:='vkontakte.ru';
http.Request.UserAgent :='Opera/9.80 (Windows NT 6.1; U; ru) Presto/2.7.62 Version/11.01';

try

s := http.Get('http://vkontakte.ru/login.php?m=1&email='+Edit1.Text+'&pass='+Edit2.Te xt);
except

if http.ResponseCode = 302 then
begin
c := http.Response.RawHeaders.Text;
i := PosEx('remixchk', c) + 9;
remixchk := Copy(c, i, PosEx(';', c, i)-i);
i := PosEx('remixsid', c) + 9;
remixsid := Copy(c, i, PosEx(';', c, i)-i);
http.Request.CustomHeaders.Text := 'Cookie: remixchk=' + remixchk +'; remixsid=' + remixsid;
s := http.Get('http://vkontakte.ru' + http.Response.Location);
end
else
begin
ShowMessage('Ошибка');
end;
end;


s := http.Get('http://vkontakte.ru/app1877068');
Memo1.Text:=s;
http.Free;

Хотя авторизация проходит!!