Авторизация на Ucoz

[19955991]

Добрый день!

Авторизуюсь вот так:

Цитата: procedure TForm1.Button1Click(Sender: TObject); begin html:=TStringList.Create; html_login:=IdHTTP1.Get('Сайт.ru'); rnd:=Pars('name="rnd" value="',html_login,'" />'); html.Add('login=submit'); html.Add('user=логин'); html.Add('password=пароль'); html.Add('rem=1'); html.Add('a=2'); html.Add('ajax=1'); html.Add('rnd='+rnd); html.Add('_tp_=xml'); html.Text:=IdHTTP1.Post('Сайт/index/sub/', html); memo1.Text:=html.Text; if Pos('/load/0-0-0-0-1',html.Text) <> 0 then Label2.Caption:='Авторизация прошла успешно!' else Label2.Caption:='Авторизация прошла неудачно';

В итоге юкоз отдает вот такой вот код:

Цитата: <?xml version="1.0" encoding="UTF-8"?><ajax><cmd p="innerHTML" t="blk549193"><![CDATA[<div align="left" style="padding:10px;"><div class="myWinLoadSD"></div></div>]]></cmd><cmd p="js"><![CDATA[var ad=window.location.href.replace(/#(.*)?/,''); setTimeout("window.location.href='"+ad+"?leDtYG'", '1000')]]></cmd></ajax>

Как я понял это какой то Js скрипт, только вот откуда и зачем мне не понятно.
Помогите кто знает в чем может быть проблема вообще

[19955991]

Помогите кто нибудь, уже второй день мучаюсь!
Кто нибудь поможет мне?