Pages

Tampilkan postingan dengan label Tutorial Delphi. Tampilkan semua postingan
Tampilkan postingan dengan label Tutorial Delphi. Tampilkan semua postingan

Rabu, 18 November 2015

Cara Membuat Program Add Save Delete Set Cookie Dengan Delphi 7

Berikut admin mau share dengan Cara Membuat Program Add Save Delete Set Cookie Dengan Delphi 7 yang dimana pembuatan program ini yang dimana untuk menggunakan cookie yang direkam oleh suatu host sebuah website, dan bagi pengguna internet gratis atau bagi pembuat injek maka istilah set cookie sering anda temukan pada sebuah log respone, sedangkan pada umumnya set cookie yang diberikan pada sebuah injector berasal dari set cookie proxy server, ini adalah ilmu baru bagi para pembuat injek karena yang umumnya terlalu terpaku pada pengotak atikan Indy Server, dan mari kita mulai main main dengan set cookie ini,...

Ok sebelumnya juga admin sudah share dengan Download HTTP Injector ok next, pada umumnya respone header pada proxy server hanya menampilkan log HTTP/1.1 200 OK, Connection: keep-alive , dan Set-Cookie: xxxx, tetapi sebenarnya proxy server punya keluaran hide log yang tidak bisa diakses oleh user karena untuk menjaga server dari tangan tangan jahil contohnya:
Proxy-Authenticate // hide log
WWW-Authenticate // hide log
Set-Timeout: // hide log
Set-Cookie: // Log Show
Set-Headers: // hide log
Set-UserAgent: // hide log, etc.

Ok tanpa basi lagi yuk mari kita langsung praktek saja, dan untuk penggunaan dan cara memanfaatkan untuk gabungan dengan payload admin rasa anda bisa memahaminya yang penting alurnya sobat mengerti saja, silahkan disimak.

1. Yang pertama silahkan buka delphi sobat lalu tambahkan 2 buah komponen yaitu Button1 dan IdHTTP1 ada pada palette indy client kemudian buat procedure sendiri procedure GetWebpageData; kemudian tekan CTRL+SHIFT+C agar procedure tersebut di genrate.

Add Set Cookie Manager With Delphi 7

2. Kemudian langkah kedua tambahkan kode dibawah ini pada hasil procedure yang sudah digenrate tadi:

procedure TForm1.GetWebpageData;
var
  http: TIdHTTP;
  cookie: TIdCookieManager;
  sResponse: String;
begin
  try
    http := TIdHTTP.Create(nil);
    http.AllowCookies := True;  // Mengijinkan Cookie
    http.HandleRedirects := True;  // Mengijinkan Redirect
    http.Proxyparams.proxyserver := '10.1.89.130'; // Proxy Server
    http.Proxyparams.proxyport := StrtoInt('8000'); // Or String To Float/Def
    http.BoundIP := '127.0.0.1';  // Local Host
    http.BoundPort:= Strtoint ('8001'); // Or String To Float/Def
   // http.Request.Accept := '';
   // http.Request.AcceptEncoding:= '';
   // http.Request.AcceptLanguage:='';
   // http.Request.CacheControl:='';
   // http.Request.Connection:='';
   // http.Request.ContentEncoding:= '';
   // http.Request.ContentLanguage:= '';
   // http.Request.ContentLength:='';
   // http.Request.ContentRangeEnd := '';
   // http.Request.ContentRangestart := '';
   // http.Request.ContentType:='';
   // http.Request.Contentversion:='';
   // http.Request.Date:='';
   // http.Request.Expires:='';
   // http.Request.From:='';
   // http.Request.Host:='';
   // http.Request.lastmodified:='';
   // http.Request.password:='';
   // http.Request.pragma:='';
   // http.Request.proxyconnection:='';
   // http.Request.referer:='';
   // http.Request.useragent:='';
   // http.Request.username:='';
    cookie := TIdCookieManager.Create(nil);
    cookie.AddCookie('Isi Dengan Cookie Ente', 'Isi Dengan Host Target');
    http.CookieManager := cookie;
    sResponse := http.Get('Isi Dengan URL/Path Domain');
    ShowMessage(sResponse);
   // Memo1.lines.add(sResponse);
  except
end;
end;

Add Set Cookie Manager With Delphi 7

3. Yang terakhir untuk memanggil procedure tersebut tergantung keperluan saja bisa anda jalankan di execute indy setelah payload atau dimana saja terserah anda contoh untuk demo saja saya akan memanggilnya dengan onclick milik buton:

procedure TForm1.Button1Click(Sender: TObject);
begin
GetWebpageData;
ShowMessage('Add Cookie Sucess...!');
end;

Add Set Cookie Manager With Delphi 7

Keterangan:
Contoh:  // http.Request.proxyconnection:=''; untuk menjalankan fungsi tersebut hilangkan tanda // misal http.Request.proxyconnection:='Keep-Alive'; , untuk proxy server silahkan sesuaikan saja apakan bertype HTTPS, HTTP, SOCKS4 atau SOCKS5 , isi cookie dengan cookie yang ditampilkan oleh server dan isi host dengan server bersangkutan contoh 'www.google.com'; lalu isi link domain dengan server tadi contoh 'https://www.google.com/' pastikan hypertext dan pathnya sama dengan yang dilihat sobat, dan untuk pengembangannya silahkan operk dan uwik uwik lagi.

Ok cuman itu saja dulu info dengan Cara Membuat Program Add Save Delete Set Cookie Dengan Delphi 7 Terbaru 2016 semoga bermanfaat dan membantu terima kaish.

Baca Juga: Kumpulan Proxy Gratis Socks 4/5 Terbaru 2016

CAPSA (Cara Apa Saja) Informasi Download Lagu dan Proxy Free Full Version Blogger

Minggu, 15 November 2015

Cara Mudah Membuat Aplikasi Ping CMD Dengan Delphi

Hallo kali ini admin Capsa mau kasih tips yaitu Cara Membuat Aplikasi Ping CMD Dengan Delphi mungkin dari sahabat sahabat ada yang belum tahu cara membuat ping cmd dan logoutnya agar bisa ditampilkan memo berikut tipsnya buat kamu delphier.

Ok dan sebelumnya juga admin sudah kasih tips tentang Cara Blokir Website di Komputer Kita ok next langsung prkatek saja ya sob, sebenarnya ada 2 cara apakah mau di genrate dengan fungsi baru yang dijalankan via form active atau single fungsi ok kita coba yang dibawah ini saja dulu silahkan langsung praktekan.

1. Langkah pertama buka delphi sobat lalu tambahkan dulu komponen Button dan memo dan untuk commandnya sudah ada via fungsinya kemudian tambahkan dulu winsock di uses biar tidak debug.


Tutorial Ping CMD With Delphi

2. Yang kedua kemudiaan Tambahkan kode dibawah ini setelah {$R *.dfm}

function GetDosOutput(CommandLine: string; Work: string = 'C:\'): string;
var
  SA: TSecurityAttributes;
  SI: TStartupInfo;
  PI: TProcessInformation;
  StdOutPipeRead, StdOutPipeWrite: THandle;
  WasOK: Boolean;
  Buffer: array[0..255] of AnsiChar;
  BytesRead: Cardinal;
  WorkDir: string;
  Handle: Boolean;
begin
  Result := '';
  with SA do begin
    nLength := SizeOf(SA);
    bInheritHandle := True;
    lpSecurityDescriptor := nil;
  end;
  CreatePipe(StdOutPipeRead, StdOutPipeWrite, @SA, 0);
  try
    with SI do
    begin
      FillChar(SI, SizeOf(SI), 0);
      cb := SizeOf(SI);
      dwFlags := STARTF_USESHOWWINDOW or STARTF_USESTDHANDLES;
      wShowWindow := SW_HIDE; //atau sw_normal
      hStdInput := GetStdHandle(STD_INPUT_HANDLE);
      hStdOutput := StdOutPipeWrite;
      hStdError := StdOutPipeWrite;
    end;
    WorkDir := Work;
    Handle := CreateProcess(nil, PChar('cmd.exe /C ' + CommandLine),
                            nil, nil, True, 0, nil,
                            PChar(WorkDir), SI, PI);
    CloseHandle(StdOutPipeWrite);
    if Handle then
      try
        repeat
          WasOK := ReadFile(StdOutPipeRead, Buffer, 255, BytesRead, nil);
          if BytesRead > 0 then
          begin
            Buffer[BytesRead] := #0;
            Result := Result + Buffer;
          end;
        until not WasOK or (BytesRead = 0);
        WaitForSingleObject(PI.hProcess, INFINITE);
      finally
        CloseHandle(PI.hThread);
        CloseHandle(PI.hProcess);
      end;
  finally
    CloseHandle(StdOutPipeRead);
  end;
end;

Tutorial Ping CMD With Delphi

3. Yang terakhir untuk memanggil fungsi diatas silahkan klik atau onclick button1lalu masukan kode Memo1.Text := GetDosOutput('ping 8.8.8.8 -t'); dan jika ping 8.8.8.8 -t agar bisa diedit diluar sesuai keinginan silahkan tinggal tambahakan komponen Edit saja jadi nanti hasilnya menjadi Memo1.Text := GetDosOutput(edit1.text);

Tutorial Ping CMD With Delphi

4. Yang terakhir silahkan simpan Save As atau terserah anda mau disimpan dimana juga dan selesai sudah tutorial kali ini tentang Cara Mudah Membuat Aplikasi Ping CMD Dengan Delphi semoga bermanfaat dan membantu terima kasih banyak good luck for you...

Baca Juga: Cara Download File di Internet Dengan MDM

CAPSA (Cara Apa Saja) Informasi Download Lagu dan Proxy Free Full Version Blogger

Selasa, 03 November 2015

Fopen Mode, ASCII Karakter dan Format String Php Pada Server Jaringan Internet

Berikut adalah Tentang Fopen Mode, ASCII Karakter dan Format String Php Pada Server Jaringan Internet yang mungkin belum sobat ketahui, dan sebelumnya juga admin sudah share dengan Internet Gratis Telkomsel ok dan berikut adalah penjelasan tentang maksud diatas.

Konsep Mesin Pada Jaringan Internet


Fopen Mode Pada sebuah Jaringan Internet:

Bagi sahabat yang baru mengenal dunia internet apalagi yang lagi belajar gratisan maka istilah Fopen Mode harus sahabat ketahui karena istilah tersebut berlaku untuk target atau server proxy server terutama untuk apcahe pada basis dokumen php beberapa perintah dasar Fopen Mode:

r Read Only
r+ Read/Write
w Write Only
w+ Read\Write
a Append
a+ Read\Append
x Write Only
x+ Read Write

ok sahabat semuanya dan Jika anda pernah membuat injek dan menemukan istilah Athread.OutboundClient.Write (with delphi) maka istilah tersebut ditujukan untuk server agar mewrite payload yang kita inputkan dan tentunya yang arahnya mengarah kepada fopen mode.

ASCII Karakter Yang diijinkan Pada sebuah Jaringan Internet:

Dan untuk ASCII Karakter Yang diijinkan pada sebuah server apache yang biasa anda gunakan untuk bypass internet gratis diantaranya adalah, dan jika ada bagian yang tidak mengandung nilai kode ASCII dibawah ini maka bagian tersebut akan diarahkan secara otomatis kesalah satu bagian yang diijinkan, silahkan baca dokumen singkatnya di php.net

"\0" - ASCII 0, NULL
"\t" - ASCII 9, Karakter TAB
"\n" - ASCII 10, Karakter Ganti Baris
"\x0B" - ASCII 11, Karakter Tab Vertikal
"\r" - ASCII 13, Karakter Enter
" " - ASCII 32, Karakter Spasi

Dan jika anda sebelumnya pernah membuat injek maka anda akan menemukan sekumpulan kode \r\n\ atau #13#10 atau bisa kita kenal dengan istilah LINES maka kode ascii yang diijinkan untuk direct koneksi hanyalah 6 kode diatas, untuk dokument lengkap ASCII Printable pernah saya bahas panjang lebar silahkan cari disitemap.

Format String Php Yang diijinkan pada sebuah Jaringan Internet

%% - Menghasilkan Tanda Persen
%b - Bilangan Biner
%c - Karakter sesuai dengan nilai ASCII
%d - Bilangan desimal
%e - Notasi ilmiah seperti 1.2e+2
%u - Bilangan desimal (unsigned)
%f - Bilangan Pecahan (tergantung dari seting lokal)
%F - Bilangan Pecahan (tidak tergantung dari seting lokal)
%o - Bilangan oktal
%s - string
%x - Bilangan Heksadesimal (huruf kecil)
%X - Bilangan Heksadesimal (huruf Besar)

Kenapa banyak bug host di tutup dan sudah tidak respone karena server proxy/direct telah memblokir string yang mengandung karakter CRLF dan diatas adalah format string dasar untuk server berbasis dokumen php.

Ok hanya itu saja dulu info pada kesempatan kali ini Tentang Fopen Mode, ASCII Karakter dan Format String Php Pada Server Jaringan Internet dan terima kasih Ayas kunjungannya dan untuk tips tips lainnya silahkan search di pencarian diatas atau cari via sitemap diatas, enjoy networking...

Download Juga: Injek Telkomsel Terbaru November 2015

CAPSA (Cara Apa Saja) Informasi Download Lagu dan Proxy Free Full Version Blogger