Setelah kalian install softwarenya, buka software tersebut, setelah dibuka, edit lebar dan panjang inject, serta tambahkan 2 button, start dan stop masuk ke tab indy server lalu pilih tcp, lihat di gambar Klik 2kali pada button start, lalu masukan code dibawah ini
lalu klik 2kali pada button stop, dan tambahkan kode dibawah iniIdMappedPortTCP1.Bindings.Add.Ip:='127.0.0.1'; IdMappedPortTCP1.Bindings.Add.Port:=StrToInt('1985'); IdMappedPortTCP1.MappedHost:='10.1.89.130'; IdMappedPortTCP1.MappedPort:=StrToInt('8000'); IdMappedPortTCP1.Active:=True; Button1.Enabled:=False; Button2.Enabled:=True;
lalu klik tcp yang tadi lalu masuk tab event > dan pilih OnExecute dan masukan code dibawah iniIdMappedPortTCP1.Active:=False; IdMappedPortTCP1.Bindings.Clear; Button1.Enabled:=True; Button2.Enabled:=False;
klik tcp > event > onOutbond COnnect dan masukan code inivar Header,Payload:string; begin Header := StringReplace(header,' #13#10 + #13#10, #13#10 + ',' + #13#10 + #13#10 200 ok', [rfReplaceAll]); Payload:='POST http://ISI BUGS OPSEL/ HTTP/1.1 SSH-2.0-1.91 sshlib: Bitvise SSH Client (Tunnelier) 4.60'+#13#10+'User-Agent: Mozilla/5.0 (Windows NT6.1; rv:14.0) Gecko/20100101 Firefox/14.0'+#13#10+'Connection: Keep-Alive'+#13#10+' Host : ISI BUGS OPSEL'#13#10+athread.NetData; if pos('CONNECT',athread.NetData) <>0 then athread.NetData:=athread.NetData+Payload;
setelah itu test project kalian, dengan menekan f9 pada keyboard, kalu kurang jelas bisa lihat videonya dibwah iniAThread.NetData := stringreplace(AThread.NetData,' :22 ',' :443',[rfReplaceAll]); 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]);
1 komentar:
Casino in the United States 2021 | DrmCadiz
The US is leading the way 부산광역 출장안마 when it comes 상주 출장샵 to gambling. 광양 출장마사지 From legalized sports betting to online 서산 출장안마 casinos and mobile apps, it is time for you 수원 출장마사지 to join the ranks
EmoticonEmoticon