|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
03.01.2009, 15:15 | #1 |
Форумчанин
Регистрация: 22.04.2008
Сообщений: 143
|
:::Keylogger:::
Знаю, эта тема не раз обсуждалась, но всё же...
Друзья! Предлагаю вашему вниманию код кейлоггера и надеюсь на Ваш опыт!!! Весь этот код Delphi7 компилирует без ошибок см. эттэчмент. А вот проблемма в следущем. 1) Нужно чтобы в определённое время (когда файл достигнет 500 КБ) вся инфа (т.е. log-файл) в качестве вложения отправлялся на мыло. У меня есть масса способов как это сделать, но все они предпологают наличие формы. Помогите как сделать это программно. 2) Как сделать эту "форму" невидимой. В режиме программирования нет формы, так и я не могу выполнить никаких действий.
Мой сайт - www.fortis-soft.narod.ru
Последний раз редактировалось doniyor; 03.01.2009 в 15:21. |
03.01.2009, 15:28 | #2 |
Форумчанин
Регистрация: 16.12.2006
Сообщений: 859
|
забудь про форму, создавай нужные компоненты динамически. Например,компонент indy idHttp
Код:
pps: не забудь в uses добавить модуль. чтоб узнать какой - наведи на компонени на палитре и в скобках написано. |
03.01.2009, 15:46 | #3 | |
Форумчанин
Регистрация: 22.04.2008
Сообщений: 143
|
Thanks!!!
Спасибо! Щас попробую! А... как сделать так чтобы формы не было видно
Цитата:
Мой сайт - www.fortis-soft.narod.ru
|
|
03.01.2009, 16:14 | #4 |
Форумчанин
Регистрация: 24.11.2006
Сообщений: 108
|
|
03.01.2009, 16:24 | #5 |
Старожил
Регистрация: 29.01.2008
Сообщений: 2,406
|
программа зависает при нажатии клавиш
|
03.01.2009, 16:50 | #6 |
Форумчанин
Регистрация: 24.11.2006
Сообщений: 108
|
только что скачал архив. и понял что создания окна ты тупо скопировал откудато. так как ты спрашиваеш как спрятать окно при этом его же при создании и заставляеш показатся параметром WS_VISIBLE (кроме этого я не пойму зачем ему системное меню)
потом тыже его снова показываеш с помощю ShowWindow(Handle, SW_ShoW); а помтом ставиш еще одну ловушку. если чесно то вабще ловушки как по мне ставиш не правильно. да и данныэ тоже. я бы в дллке иницыализировал какуюто глобальную переменную (тудабы положил хендл окна, и хранил бы там принятые данные) писалбы по байтно в этот масив и когда он наполнился то передалбы сообщение ексехе которая забрет данные и запишет в файл/отправит по почте. и подключи модуль Classes там есть удобная вещь как AllocateHWnd. создаст не визуальное окно с методом. просто тебе по любому прийдется юзать инди компоненты а они уже юзают этот модуль. Хотя можно на сокетах навпрямую общатся с pop3 сервером. можеш на вики почитать про pop3 протокол. посути тебе того хватит чтобы написать свою работу на сокетах (если ты канешно работал с сокетами) |
04.01.2009, 07:54 | #7 |
Форумчанин
Регистрация: 22.04.2008
Сообщений: 143
|
Спасибо!
Действительно не обратил внимания на то что писал. В любом случае форма моего кейлоггера не видна. Теперь буду пытаться создавать indy-компоненты динамически и отправлять почту (с сокетами работать мало опыта). К стати у меня есть код -
var Msg: TIdMessage; begin Msg.Subject:='тема сообщения'; //текст темы сообщения Msg.Recipients.EMailAddresses:='bog danwe@mail.ru'; //указываем адрес получателя Msg.From.Adress:='delphi@mail.ru'; //указываем автора письма Msg.Body.Text:='текст сообщения'; //размещаем текст сообщения Msg.Date:=StrToDate('01.12.2004');//дата отправки письма может быть любой end; полный вариант отправки - http://delphi-ex.narod.ru/how_to_send_mail.htm Его можно использовать для отправки эттечмента моего кейлоггера?
Мой сайт - www.fortis-soft.narod.ru
Последний раз редактировалось doniyor; 04.01.2009 в 07:56. |
04.01.2009, 10:46 | #8 |
Форумчанин Подтвердите свой е-майл
Регистрация: 07.07.2007
Сообщений: 241
|
отправка файлов:
Код:
|
04.01.2009, 18:57 | #9 |
Форумчанин
Регистрация: 22.04.2008
Сообщений: 143
|
Огромное спасибо!
Щас попробую. Вообще у меня не было проблем с отправкой писем на мыло если дело касалось отдельного приложения. Но тут (как я понял) дело обстоит иначе... Ещё раз thanks за содействие!
Мой сайт - www.fortis-soft.narod.ru
|
05.01.2009, 07:56 | #10 |
Пользователь
Регистрация: 17.12.2008
Сообщений: 17
|
про формы всякие их видимость невидимость особенно основной формы неплохо описано в книге "Delphi глазами хакера" кстати если главной форме просто дать visible:=false она остается видимой
ICQ 897-45-46
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
keylogger | DeDoK | Общие вопросы Delphi | 15 | 06.06.2010 00:15 |
Как правильно удалить с компа Keylogger? | Кира | Помощь студентам | 4 | 17.12.2007 16:51 |