%
/*
* $Id$
*/
/*
*
* hello.hs
* Famous "Hello World"!
*
* Written by Felipe Coury
* www - http://www.harbour-project.org
*
*/
FUNCTION Start()
// Add content-type parameter if using active page on a Web Server
IF !empty( GetEnv( "SERVER_NAME" ) )
OutStd( "HTTP/1.0 200 OK" + chr(10) )
OutStd( "CONTENT-TYPE: TEXT/HTML" + chr(10) + chr(10) )
ENDIF
%>
Hello world!
<%
// Now saying hello to the world in 3 different ways:
// 1. Pure harbour:
OutStd( "Hello world!
" )
// 2. Hybrid harbour-html:
%>
<% OutStd( "Hello world!" ) %>
<%
// 3. Pure html:
%>
Hello world!