Авторизация vBulletin [гемор]

[FleXik]

procedure TForm1.Button1Click(Sender: TObject);
var
rev, s, cookie:string;
begin
rev:=send('GET','http://betmasters.ru/activity.php','','',true,'','','','','','','');
cookie:=parser(rev,'','@@@',0,0);
s:=parser(rev, 'name="s" value="', '"',0,0);
rev:=send('POST','http://betmasters.ru/login.php?do=login','vb_login_username='+Edit1.Text+'&vb_login_password='+Edit2.Text+'&vb_login_password_hint=Пароль&s='+s+'&securitytoken=guest&do=login&vb_login_md5password='+LowerCase(UTF8Encode(md5(Edit2.Text)))+'&vb_login_md5password_utf='+LowerCase(md5(Edit2.Text)),cookie,false,'','','','','','','');
rev:=send('GET','http://betmasters.ru/forum.php');
if Pos('Выход', rev)<>0 then
ShowMessage('Авторизовались') else
ShowMessage('Ошибка авторизации');
end;

Вот набросал, непонятна... securitytoken - получается после отправки POST запроса, пробовал 2 POST запроса, пробовал по разному, полный геморой. Нужна помощь, спасибо.

[FleXik]

procedure TForm1.Button1Click(Sender: TObject);
var
rev, s, cookie, token:string;
begin
rev:=send('GET','http://betmasters.ru/','','',true,'','','','','','Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3','');
cookie:=parser(rev,'','@@@',0,0);
s:=parser(rev, 'name="s" value="', '"',0,0);
token:=parser(rev, 'var SECURITYTOKEN = "', '"', 0,0);
rev:=send('POST','http://betmasters.ru/login.php','vb_login_username='+Edit1.Text+'&vb_login_password='+Edit2.Text+'&vb_login_password_hint=Пароль&s='+s+'&securitytoken='+token+'&do=login&vb_login_md5password='+LowerCase(md5(Edit2.Text))+'&vb_login_md5password_utf='+LowerCase(md5(Edit2.Text)),cookie,true,'','','','','','Opera/9.50 (Windows NT 5.1; U; ru)','http://betmasters.ru/login.php');
rev:=send('GET','http://betmasters.ru/');
if Pos('Выход', rev)<>0 then
begin
Form1.Label1.Caption:='ONLINE';
Form1.Label1.Font.Color:=clGreen;
ShowMessage('Авторизовались');
end else
ShowMessage('Ошибка авторизации');
end;

P.S погуглил немного, понял что у меня все правильно, добавил парсинг SECURITYTOKEN, добавил useragent (:D), даже реферрера впилил, не работает, или я калека или с сайтом что-то...

[FleXik]

все еще нужна помощь, знатоки - помогите пожалуйста.

[FleXik]

ап, все еще нужна помощь..