09.08.2009, 01:02
|
|
Познающий
Регистрация: 21.11.2008
Сообщений: 36
Провел на форуме:
117394
Репутация:
6
|
|
PHP код:
procedure Brute();
var
emails:TStingList;
pass:TStingList;
post:TStingList;
i,j:integer;
begin
email:=TStringList.Create; pass:=TStringList.Create;
http:=TidHTTP.Create(nil);
http.HandleRedirects:=true;
post:=tstringlist.Create;
for i:=0 to emails.Count-1 do begin
post.Clear;
post.Add('email='+emails.Strings[i]);
for j:=0 to pass.Count-1 do begin
post.Add('pass='+pass.Strings[j]);
result:=http.Post('/',post);
if pos('',result)>;0 then
///////
//тут будет код
///////
else
///////
//и тут
//////
end;
end;
emails.Free;
pass.Free;
http.Free;
post.Free;
end;
я вот хз как его дароботать шоб оно работало =))
странный код и я хз какие там компоненты нужны я грю новичек поетому и прошу обработать это в исходник...  |
|
|