Cara membuat Inject sederhana dengan delphi 7

By : Naldo hatake 0 Comment

Cara membuat Inject sederhana dengan delphi 7

oke langsung saja..

HARUS SABAR TELATEN TELITI TEKUN DAN TIDAK SOMBONG

Pertama buka delphi 7 anda.
Ditampilan pertama anda akan melihat from kosong,lalu dimenu standard anda klik tombol button untuk memasang buttonnya
sehingga menjadi
lalu pasang lagi button kedua dengan cara yang sama sehingga menjadi



sekarang rubah nama buttonnya,klik satu kali pada button1 lalu pada properties dimenu caption kalian rubah namanya sesuai dengan keinginan.Saya akan merubah namanya pada button1 menjadi HIDUP dan button2 menjadi MATI


sehingga menjadi


lalu kalian klik dua kali pada button1 tadi sehingga akan terbuka tempat meletakan kode-kodenya
Nah pada button1 kalian masukan kode ini

IdMappedPortTCP1.Bindings.Add.Ip:='127.0.0.1';
IdMappedPortTCP1.Bindings.Add.Port:=StrToInt('8080');  ///disini angka 8080 ada listen portnya bisa kalian ganti sesuka hati
IdMappedPortTCP1.MappedHost:='10.1.89.130'; ///disini angka 10.1.89.130 ada proxy operator bisa kalian ganti sesuai dengan operator apa yang ingin kalian coba injectnya
IdMappedPortTCP1.MappedPort:=StrToInt('8000'); ///disini angka 8000 ada port operator bisa kalian ganti sesuai dengan operator apa yang ingin kalian coba injectnya
IdMappedPortTCP1.Active:=True;
Button1.Enabled:=False;
Button2.Enabled:=True;

ini adalah daftar proxy dan port operator yang sangat sering digunakan

Telkomsel
proxy                     port
10.1.89.130           8000
Indosat
10.19.19.19           8080
XL
202.152.240.50     8080
THREE 3
10.4.0.10               3128
AXIS
10.8.3.8                 8080


kemudian kalian klik dua kali di button2 tadi,masukan kode ini

IdMappedPortTCP1.Active:=False;
IdMappedPortTCP1.Bindings.Clear;
Button1.Enabled:=True;
Button2.Enabled:=False;

sehingga



lalu kalian masukan TCP terletak dimenu indy servers


klik satu kali di TCP nya lalu menu events klik dua kali menu OnExecute

kemudian diatas tulisan begin kalian letak kode

var
ESIND:string;

setelah itu dibawah tulisan begin kalian letak

ESIND:='GET http://BUGSKAMU/ HTTP/1.1'+#10#13#10#13#10#13+'Connection: Keep-Alive'+#10#13+'Host : BUGSKAMU'#10#13;
if pos('CONNECT',athread.NetData) <>0 then
athread.NetData:=athread.NetData+ESIND;


tulisan BUGSKAMU kalian ganti dengan bug yg kalian ketahui
sehingga

masih dimenu events TCP kalian klik dua kali dimenu ONOUTBOUNDDATA lalu masukan kode

 if (Pos('HTTP', AThread.NetData) <> 0) then
  begin
 AThread.NetData := AThread.NetData;
 AThread.NetData := 'HTTP/1.0 200 Connection established' + #13#13#13 + AThread.NetData;
 AThread.NetData := StringReplace(AThread.NetData,':109',':443',[rfReplaceAll]);

sehingga

terakhir kalian save as dimenu file
lalu kalian buildproject1 di menu project

lalu silahkan coba dengan ssh/openvpn kalian...






Naldz Harry Hatake

Author :

Anda Baru Saja Membaca Artikel Tentang Cara membuat Inject sederhana dengan delphi 7 ,Anda Boleh Menyebarluaskan / Mengcopy Paste Artikel Cara membuat Inject sederhana dengan delphi 7 Ini Jika Bermanfaat Buat Anda , Namun Saya Mohon Untuk Mencantumkan Link Cara membuat Inject sederhana dengan delphi 7 Sebagai SumberNya Dan jangan Lupa Berikan Komentarnya. Terimakasih atas kunjungannya kalian baru saja membaca artikel berjudul Cara membuat Inject sederhana dengan delphi 7
.
Share Artikel

Artikel Terkait

-----------GUNAKAN GOOGLE CROME UNTUK TAMPILAN MAKSIMAL BLOG INI-----------

Berikan Comentarnya ya Gan, :)
--Berkomentarlah yang Relevan
--Berkomentar dengan bahasa yang baik dan benar
--Dilarang membuat rusuh [-(
--Dilarang meletakan LINK aktif [-(
--Dilarang meletakan link porno/iklan [-(
--Boleh meletakan Link non aktif selama tidak menyalahi aturan :-)
--Jika ingin dikunjung/komentar balik(yang sebelumnya belum ada perjanjian) harap sertakan link non aktif

---Terimakasih Telah Berkunjung Dan Komentarnya

“Selamat Datang DiBlog Naldo Hatake”
Saya Naldz Harry Hatake selaku Admin disini mengucapkan TerimaKasih Kepada agan Yang telah berkunjung keblog Sederhana Ini, "Semoga Pada Artikel yang akan Agan baca dan simak bisa bermanfaat untuk agan", "Pastikan anda menggunakan GOOGLE CROME agar tampilan tidak kacau"
"Jangan lupa berikan comentarnya YA :)"

Lanjutkan →