apathedosheu
Użytkownik
- Dołączył
- Luty 2, 2012
- Posty
- 14
Od dzisiejszego południa piszę prostego trojana na socketach w ten sposób chciałbym nauczyć się delphi. Nie wiem w jaki sposób mam wysłać polecenie do serwera uruchamiające program. Źródło programu wpisuję w kliencie np. c:\Windows\notepad.exe. Dotychczas jeśli chciałem wysłać jakieś polecenie robiłem to za pomocą
Odbierałem w ten sposób
Jeśli to ma w czymś pomóc to używam Borland Delphi 7 Personal. Link do screenu programu.
Kod:
clientsocket1.socket.SendText('cdopen');
Kod:
s:=serversocket1.Socket.Connections[0].ReceiveText;
if (s='cdopen') then
begin
mciSendString('Set cdaudio door open wait',nil,0,handle);
end;
Jeśli to ma w czymś pomóc to używam Borland Delphi 7 Personal. Link do screenu programu.