Как пройти авторизацию на сайте www.rmstat.ru через webbrowser oleobject

[Plexdeath]

Здесь логин : <p><span class="dialog_label">Номер ICQ:</span> <span class="dialog_input"><input type="text" id="username" onkeypress="System.keyHandler(event , System.login);" /></span></p>
<div style="clear:both"></div>

Пароль : <p><span class="dialog_label">Пароль:</span> <span class="dialog_input"><input type="password" id="password" onfoucs="this.select();" onkeypress="System.keyHandler(event , System.login);" /></span></p>
<div style="clear:both"></div>

Кнопка войти <div id="modal" class="modalFrame" style="display:none;">
<div id="loginDialog">
<p><span class="dialog_modal_title">Войти</span></p>

[Romer9999]

procedure TForm1.Button3Click(Sender: TObject);
var
  EncodedDataString: string;
  PostData: OleVariant;
  Headers: OleVariant;
  i: integer;
begin
  EncodedDataString := 'username='+HTTPEncode('твой ICQ ')+'&'+
                       'password='+HTTPEncode('твой пароль');
  PostData := VarArrayCreate([0, length(EncodedDataString)-1], varByte);
  for i := 1 to length(EncodedDataString) do
    PostData[i-1] := ord(EncodedDataString[i]);
  Headers := 'Content-type: application/x-www-form-urlencoded'#10#13;
  WebBrowser1.Navigate('тут из тега Action вставь ',
                       EmptyParam, EmptyParam, PostData, Headers);
end;

[Plexdeath]

Способ не работает

[Виталий Желтяков]

А куки включены?

[Plexdeath]

Куки Включены

[Виталий Желтяков]

Возможно у них есть система защиты от ботов - проверяется реферал или агент. Через webbrowser в Delphi вручную авторизоваться можно?

[Plexdeath]

Да можно но удобнее былобы кликнуть на кнопку и автоматом зайти на сайт