Помогите с авторизацией.

[Spine]

Как правильно послать авторизацию?
Есть исходник на Delphi перевести его на VB не получается.

EncodedStr := 'player_nick='+user+'&player_password='+pass;
Post := VarArrayCreate([0, Length(EncodedStr) - 1], varByte);
for I := 1 to Length(EncodedStr) do
Post[I - 1] := Ord(EncodedStr[I]);
Header := 'Content-Type: application/x-www-form-urlencoded' + #10#13;
Web.Navigate('http://www.*/game.php', EmptyParam, EmptyParam, post, Header);

[Spine]

Пасиба, разобрался сам ))

[Юджин]

обьясни