Sabtu, 07 Mei 2016

Belajar Membuat Inject Bagian 3


Belajar Membuat Inject Bagian 3 - Dari dua tutorial yang saya bagikan kemarin Belajar Membuat Inject Bagian 1 dan Belajar Membuat Inject Bagian 2 Inject sudah jadi, sampai situ kamu sudah berhasil membuat inject kamu. Cuma yang harus kamu pikirkan hanyalah cara membuat/meracik payload kamu, sampai benar benar pas dan dapat di terima server tanpa ada error response.


Untuk itu di Belajar Membuat Inject Bagian 3 ini saya akan memberikan beberapa tutorial tambahan saja seperti :
  • Cara Membuat LED Upload/Download TCP
  • Cara Membuat Manual BUG
  • Cara Membuat Log Upload/Download TCP
Baiklah yang pertama Cara Membuat LED Upload/Download TCP, sebelumnya apa itu LED Upload/Download ?,mungkin kamu yang sering menggunakan inject buatan orang sering menemukan fitur LED Blink atau mati menyala saat di bawah Upload maupun Download, jadi seperti itulah fungsinya.
  1. Buka Source yang kamu dapat dari 2 tutorial Membuat Inject Sebelumnya. Buat Procedure terlebih dahulu, LEDUpload (untuk led blink upload) & LEDDownload (untuk led blink download).
  2. Tambahkan 2 komponen Shape , Addtional > Shape
  3. Setelah itu tambahkan ini di bawah {$R *.dfm}
  4. procedure TForm1.LEDUpload;
    begin
    shape1.Refresh;
    if shape1.brush.color = clWhite then begin
    shape1.brush.color := clGreen;
    end else begin
    shape1.brush.color := clWhite;
    end;
    end;

    procedure TForm1.LEDDownload;
    begin
    shape2.Refresh;
    if shape2.brush.color = clWhite then begin
    shape2.brush.color := clBlue;
    end else begin
    shape2.brush.color := clWhite;
    end;
    end;

  5.  Kemudian untuk menerapkan nya, taruh procedure LEDUpload di IdMappedPortTCP > Event > onExecute dan LEDDownload di IdMappedPortTCP > Event > onOutbondData. Jadinya seperti ini:
DOWNLOAD SOURCE


Selanjutnya yang kedua Cara Membuat Manual BUG,
  1. Tambahkan 1 Edit dan perhatikan nama komponen Edit nya, contoh nama yang saya ambil Edit3
  2. Masuk ke menu payload, IdMappedPortTCP > Event > onExecute. kemudian buat seperti ini.
DOWNLOAD SOURCE


Berikutnya Cara membuat Log Upload/Download TCP.
  1.  Tambahkan 2 Komponen memo, atur besar kecilnya sesuai selera.
  2. Kemudian masuk ke halaman payload kamu, cara nya sama seperti yang di atas. IdMappedPortTCP > event > onExecute, Kemudian tambahkan ini  di bawah begin Memo1.Lines.Add(AThread.Netdata); dan cara yang sama di IdMappedPortTCP > event > onOutboundData, kemudian tambahkan ini di bawah begin Memo2.Lines.Add(AThread.Netdata);
DOWNLOAD SOURCE


Baiklah, dari 3 tutorial membuat inject yang saya buat, saya rasa anda sudah tau dasar-dasar membuat inject dengan Delphi7.
Nantikan update berikutnya..

Tidak ada komentar:

Posting Komentar