Отправка POST запроса

[S@fer]

Здравствуйте.
Есть форма:
<FORM NAME="entryform" METHOD="post" ACTION="/db/login.php">
<INPUT TYPE="text" NAME="username" SIZE=20 VALUE="">
<INPUT TYPE="password" NAME="password" SIZE=20>
<INPUT TYPE="submit" VALUE="Войти">
<INPUT TYPE="button" VALUE="Отменить" onClick="javascript: history.go(-1)">
</FORM>

Пишу программку которая автоматически авторизуется на сайте. Использую WebBrowser

function Str2Variant(S:string):OleVariant;
var Data:Pointer;
begin
Result:=VarArrayCreate([0,Length(S)],varByte);
Data:=VarArrayLock(Result);
try
Move(S[1],Data^,Length(S));
finally
VarArrayUnlock(Result);
end;
Result[Length(S)]:=0;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
URL,Flags,TargetFrameName,PostData, Headers:OleVariant;

begin

PostData:=Str2Variant('username=nam e&password=pass');
URL:='http://www.site.ru/db/login.php';
Flags:=EmptyParam;
TargetFrameName:=EmptyParam;
Headers:='Content-Type: application/x-www-form-urlencoded'#10#13;
WebBrowser1.Navigate(URL, Flags, TargetFrameName, PostData, Headers);

end;

Но авторизация не проходит.
Подскажите пожалуйста где моя ошибка.
Спасибо.