DAN BIKIN 2 BUTTON SEPERTI GAMBAR
LALU KLIK 2x BUTTON 2 SEPERTI DI GAMBAR
DAN MASUKKAN SOURCE :
IdMappedPortTCP1.Active:=False;
IdMappedPortTCP1.Bindings.Clear;
Button1.Enabled:=True;
Button2.Enabled:=False;
LALU KLIK 2x BUTTON 1 SEPERTI GAMBAR
DAN MASUKKAN SOURCE :
IdMappedPortTCP1.Bindings.Add.Ip:='127.0.0.1';
IdMappedPortTCP1.Bindings.Add.Port:=StrToInt('8888');
IdMappedPortTCP1.MappedHost:='10.19.19.19';
IdMappedPortTCP1.MappedPort:=StrToInt('8080');
IdMappedPortTCP1.Active:=True;
Button1.Enabled:=False;
Button2.Enabled:=True;
SETELAH TUH BIKIN TCP SERVER SEPERTI GAMBAR :
LALU MASUK KE TCP EXCUTE SEPERTI GAMBAR
LALU MASUKKAN SOURCE :
var
VIAN:string; ( TARUH DI ATAS BEGIN 0
VIAN:='GET http://BUGSKAMU/ HTTP/1.1'+#13#10+'User-Agent: Mozilla/5.0 (Windows NT6.1; rv:14.0) Gecko/20100101 Firefox/14.0 Host : BUGSKAMU'#13#10#13#10#13#10+athread.NetData;
if pos('CONNECT',athread.NetData) <>0 then
athread.NetData:=athread.NetData+VIAN; (TARUH DI BAWAH BEGIN )
MASUKAN BUG KAMU DI TULISAN ( BUGSKAMU)
LALU MASUK KE TCP OUTBOND SEPERTI GAMBAR
LALU MASUKAN SOURCE : ( KALO MUNCUL PESAN EROR < TIDAK PAKEK INI JUGA GPP >> GAK NGARUH JUGA )
AThread.NetData := stringreplace(AThread.NetData,' 403 Forbidden',' 200 OK',[rfReplaceAll]);
AThread.NetData := StringReplace(AThread.NetData,'HTTP/1.1 302 Found','HTTP/1.1 200 Ok',[rfReplaceAll, rfIgnoreCase]);
JADINYA SEPERTI INI :
LALU PERKECIL UKURAN SEPERTI GAMBAR & BISA DI TAMBAH ALPHA SKIN SEPERTI GAMBAR
LALU PILIH FILE ADA DI ATAS SENDIRI LALU PILIH SAVE PROJECT AS DAN PILIH FOLDER DI MANA ANDA MAU MENYIMPANYA LALU OK-OK
SETELAH ITU KLIK PROJECT JUGA ADA DI ATAS LALU KLIK BUILD PROJECT
DAN SUDAH SELESAI.. TAARAAA ,, SILAHKAN DI BUKA INJEK NYA DAN COBAIN BUAT DI GABUNG SSH ATAU PUN TUNEL LAINYA
YANG MAU NONTON VIA VIDEO disini
SEMOGA SUCCES ,, KLO GAGAL JANGAN NYERAH
BISA TANYA KE SAYA DI LINK INI
VIDEO NYA :
7 comments:
Makasih gan.infonya,, izin comot source nya ^_^
sip gan ^^
share terus mastah -/\-
ampun guru ' /\'
Thaks mastah ilmunya :D Sorry ane masih Newbie mastah Mohon bingbingganya
Manteepppp!! :D
sep gan :D
Post a Comment