Logowanie na Galaxywars

0

Witam

Chce się zalogować na www.galaxywars.pl , ale zamiast otrzymać numer otrzymuje jakiś kodzik HTML :

head>

<title>GW Login</title> <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1"> <link rel="stylesheet" type="text/css" href="game.css"> <style type="text/css"> @media all { DW\:clientcaps {behavior:url(#default#clientcaps)}}</style></head> <body text="#FFFFFF" onload="s()">

oto kodzik :

var
 sesja:string;
 Input,Output:TStringStream;
begin
 Button1.Enabled:=False;
 Input:=TStringStream.Create('');
 Output:=TStringStream.Create('');
 idHTTP1.Host:=('www.galaxywars.pl');
 idHTTP1.Request.Connection:=('Keep-Alive');
 idHTTP1.Request.UserAgent:=('Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)');
 idHTTP1.Request.AcceptLanguage:=('pl');
 idHTTP1.Request.ContentType:=('application/x-www-form-urlencoded');
 idHTTP1.Request.ContentLength:=172;
 idHTTP1.Request.CacheControl:=('no-cache');
 idHTTP1.Request.Referer:=('http://www.galaxywars.pl/gw/login.php');
 Input.WriteString('ib=3592207&cw=&id=45ef9bcb45&timestamp=1130615185&ln='
 +Edit1.Text+'&nqt=1130615921&nqm=&nqfl=7%2C0%2C19%2C0&nqds=6%2C5%2C1%2C902&res=1024x768%3A32&pw='+Edit2.Text+'&server=1&layout=1');
 idHTTP1.Post('http://www.galaxywars.pl/gw/login.php',Input,Output);
 sesja := Copy(Output.DataString,Pos('session=',Output.DataString)+8,1000);
 RichEdit1.Clear;
 if Length(sesja) > 0 then RichEdit1.Text:=sesja else RichEdit1.Text:='Błąd Połączenia';
 Input.Free;
 Output.Free;
 Button1.Enabled:=true;
end;

Gdzie jest ewentualny błąd, a może to wina nieodbierania i wysyłania ciastek.
Z góry Thx

0

a wiesz ze zgodnie z regulaminem tej gry nie mozna uzywac programow do automatycznego logowania itd ??? [diabel]

1 użytkowników online, w tym zalogowanych: 0, gości: 1