Проблема с парсингом

[megbum]

procedure TForm1.sButton1Click(Sender: TObject);
var s,b,c:string;
a:Tstringlist;
begin
a:=TstringList.Create;
a.Add('loginForm_default_username='+sedit1.text);
a.add('loginForm_default_password='+sedit2.text);
a.add('loginForm_default_login_submit=Вход');
s:=id[Ссылки могут видеть только зарегистрированные и активированные пользователи]('[Ссылки могут видеть только зарегистрированные и активированные пользователи]',a);
if pos('Выбор сервера',UTF8Decode(s)) <>0 then
begin
ShowMessage('Авторизовались');
end
else
begin
ShowMessage('Ошибка авторизации!');
end;
b:=id[Ссылки могут видеть только зарегистрированные и активированные пользователи]('[Ссылки могут видеть только зарегистрированные и активированные пользователи]'+sedit3.text+'.darkorbit.bigpoint.com/indexInternal.es?action=internalStart');
c:=copy(b,pos('Ник:',b)+50000,1000);
ShowMessage(c);
end;

он у меня парсит все равно значение главной страницы ДО

[metraz]

1)Такой код при повторном нажатии на кнопку работать не будет.
2)c:=copy(b,pos('Ник:',b)+50000,1000); таким кодом врядли ты вытащишь то что тебе нужно.

[megbum]

1)Такой код при повторном нажатии на кнопку работать не будет.
2)c:=copy(b,pos('Ник:',b)+50000,1000); таким кодом врядли ты вытащишь то что тебе нужно.
А каким тоогда кодом?:sad:

[iNugno]

[Ссылки могут видеть только зарегистрированные и активированные пользователи]
парсеры бруты
и прочей фигни
не можешь написать авторизацию, а парсеры и бруты для тебя фигня, хм..
код ищи в программировании делфи, там денди как-то разок выложил авторизацию..

[megbum]

[Ссылки могут видеть только зарегистрированные и активированные пользователи]


не можешь написать авторизацию, а парсеры и бруты для тебя фигня, хм..
код ищи в программировании делфи, там денди как-то разок выложил авторизацию..
Чувак у меня авторизация успешная
Кароче я спарсить SID хочу

[iNugno]

c:=copy(b,pos('Ник:',b)+50000,1000);
сид и ник - две разные вещи, а если успешная авторизация - спарсить сид будет как раз два.

[VeTaL_UA]

[Ссылки могут видеть только зарегистрированные и активированные пользователи] Читай. Внимай. Понимай. Делай.

[metraz]

А каким тоогда кодом?:sad:
Если с помощью копипоз не можешь, тогда учи регулярки, хоть и зло это