home *** CD-ROM | disk | FTP | other *** search
/ Packard Bell - Internet on a CD / internet on a cd.cdr / Internet / sites / HTML_1 / hello.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1998-07-16  |  331 b   |  21 lines
  1. module hello; 
  2.  
  3. #include <stddefs_p.h>
  4. #include "./cgi-pascal.h"
  5.  
  6. procedure cgi_main(var ci: cgi_info; var params: form_pointer);
  7.  
  8.   var
  9.      a: integer;
  10.      s: string;
  11.  
  12.     begin 
  13.         s := 'text/html' + char(0);
  14.         a := print_mimeheader(s);
  15.         writeln('<html>');
  16.         writeln('Hello Word!');
  17.         writeln('</html>') 
  18.         end;{cgi_main}
  19.  
  20.  
  21.