CGI Web Programming/id

From Lazarus wiki
Jump to: navigation, search

English (en) español (es) français (fr) Bahasa Indonesia (id) русский (ru) 中文(中国大陆)‎ (zh_CN)

Ini adalah awal dari tutorial mengenai pemrograman cgi web. Setiap orang diundang untuk berkontribusi.

Contoh yang sangat mendasar

Ini adalah contoh dari program CGI minimal untuk mendemonstrasikan...

  1. Penyetelan cookie
  2. Mengeluarkan tipe konten (misalnya mnaruh teks resmi untuk HTTP)
  3. Membaca Cookies
  4. Membaca data form via GET
  5. Membaca data form via POST
program mini;

uses dos;

var
  a:string;
  c:char;
begin
  //set cookie (harus ada sebelum baris content-type di bawah)
  //jangan lupa untuk mengubah tanggal berakhir
writeln('Set-cookie:widget=value; path=/; expires= Mon, 21-Mar-2005  18:37:00 GMT');

  //output halaman http legal
  writeln('Content-Type:text/html',#10#13);

  //demonstrasikan mendapatkan cookies
  a:= GetEnv('HTTP_COOKIE');
  writeln('cookies:',a);
  
  //demonstrasikan hasil GET
  a:='';
  a:= GetEnv('QUERY_STRING');
  writeln('GET: ',a);
	
  //demonstrasikan hasil POST 
  a:='';
  while not eof(input) do
  begin
     read(c);
     a:= a+c;
  end;	 
  writeln('POST: ',a);
end. 

Hitcouter sederhana

Aplikasi hitcounter menyajikan hitcounter sederhana untuk website anda. Dimungkinkan untuk memasukan blocklists dalam file konfig agar robots dan barangkali komputer anda sendiri dikecualikan dari statistik. Masih ada banyak peningkatan yang dimungkinkan tentunya seperti menyetel cookie agar anda hanya mendapatkan satu hit per sesi, tapi ini memberikan pengenalan yang baik terhadap pemrograman CGI. Jika anda menggunakan kode dan mengubahnya, silahkan kirimkan kepada saya patch agar saya dapat memutakhirkannya.

Anda dapat menemukan kode di sini: [1]