On Fri, 11 Mar 2011, Leonardo M. Ramé wrote:
Hi, does anyone knows how to return a correct 404 error from an fcl-web cgi
app?.
I'm doing this:
procedure TFPWebModule1.myRequest(Sender: TObject;
ARequest: TRequest; AResponse: TResponse; var Handled: boolean);
begin
AResponse.Code := 404;
AResponse.CodeText := 'Not Found';
Handled := True;
end;
I use this because my Apache has an .htaccess's "ErrorDocument 404 ..."
directive to take actions when 404 errors are found, but this is not
working with my CGI. In my case, the contents (empty) sent by the CGI are
shown in the client side, while I whould like to show the 404 message
generated by Apache.
Then you should add it to
AResponse.Content:='The html';
Michael.
_______________________________________________
fpc-devel maillist - [email protected]
http://lists.freepascal.org/mailman/listinfo/fpc-devel
