CGI Web Programming
From Lazarus wiki
Revision as of 19:46, 14 January 2006 by Sekelsenmat (talk | contribs)
This is the start of a tutorial about cgi web programming. Everyone is invited to contribute.
A very basic example
Here is an example of a minimal CGI program to demonstrate...
- Setting a cookie
- Outputting the content-type (ie make it put out legal text for HTTP)
- Reading Cookies
- Reading form data via GET
- Reading form data via POST
program mini; uses dos; var a:string; c:char; begin //set a cookie (must come before content-type line below) writeln('Set-cookie:widget=value; path=/; expires= Mon, 21-Mar-2005 18:37:00 GMT'); //output legal http page writeln('Content-Type:text/html',MESSAGE KEY MISSING: '10'13); //demonstrate get cookies a:= GetEnv('HTTP_COOKIE'); writeln(' cookies:',a); //demonstrate GET result a:=''; a:= GetEnv('QUERY_STRING'); writeln(' GET: ',a); //demonstrate POST result a:=''; while not eof(input) do begin read(c); a:= a+c; end; writeln(' POST: ',a); end.