Как проверить баланс в сети домолинк!!!

[Antonenko]

Привет всем!!! В общем такая проблема: нужно написать программку проверка баланса в сети домолинк. Обшарил весь инет ниче не нашел кроме проверки баланса для корбины но этот алгоритм не подходит. Буду рад любым исходникам. Заранее спасибо!!!!

[Квэнди]

бюджета что-то не видно

[Antonenko]

procedure TForm1.Button1Click(Sender: TObject);
var
Data: TIdMultiPartFormDataStream;
S:string;
begin
Data:=TIdMultiPartFormDataStream.Cr eate;
try
Data.AddFormField('user','mcc22599' );
Data.AddFormField('pass','X4Dfg328' );

IdHTTP.Request.Host:='http://www.isp.tulatelecom.ru';
IdHTTP.Request.Referer:='http://www.isp.tulatelecom.ru/balans/';
IdHTTP.Request.AcceptLanguage:='ru' ;
idhttp.Request.ContentType:='applic ation/x-www-form-urlencoded';
IdHTTP.Request.UserAgent:='Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; MRA 4.6 (build
01425); InfoPath.1)';
IdHTTP.Request.Connection:='Keep-Alive';

S:=idHTTP.Post('http://www.isp.tulatelecom.ru/balans/getbalans.phtml',Data);

Memo2.SetTextBuf(PChar(S));
Memo2.Lines.SaveToFile('1.txt');
finally
Data.Free;
end;


Вот сам код программы. В результате выполнения кода в Memo2 появлятеся текст странички с надписью Неверное имя пользователя или пароль. Вот и не пойму почему. Еще у меня вопрос. Запускаю снифер, нажимаю на кнопку выполнения данного кода программы, на адрес http://www.isp.tulatelecom.ru/balans/getbalans.phtm отправляется пакет тока с одними заголовками указанными в IdHTTP.Request а сам пароль и имя пользователя не отправляются почему?

[Antonenko]

Вот исходный код ява скрипта:

<FORM name=balans onsubmit="return check()"
action=getbalans.phtml method=post><FONT size=-1>Ваше
имя входа</FONT><BR><INPUT type=input size=40
name=user><BR><FONT size=-1>Ваш пароль</FONT><BR><INPUT
type=password size=40 name=pass><BR><BR>
<CENTER><FONT size=-1><INPUT type=submit value=Отправить> <INPUT type=reset value=" Очистить "></FONT></CENTER></FORM></TD>

[Antonenko]

Все проблема решена. Тему можно закрыть. Кому нужен исходник пишите мне на Alarm_x@mail.ru